Metrics for Distance on a great circle

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze1.2s (3.6%)

Memory

5.0MiB live, 908.8MiB allocated

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
0%	0%	99.8%	0.2%	0%	0%	0%	7
0%	0%	99.8%	0.2%	0%	0%	0%	8
0%	0%	99.8%	0.2%	0%	0%	0%	9
0%	0%	99.8%	0.2%	0%	0%	0%	10
0%	0%	99.8%	0.2%	0%	0%	0%	11
0%	0%	99.8%	0.2%	0%	0%	0%	12

Compiler

Compiled 67 to 28 computations (58.2% saved)

sample8.9s (27.1%)

Memory

142.5MiB live, 7 707.1MiB allocated

Samples

7.7s	7 405×	1	valid
184.0ms	851×	0	valid

Precisions

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

ival-cos: 2.4s (32.5% of total)

ival-sin: 2.3s (30.6% of total)

ival-mult: 788.0ms (10.7% of total)

adjust: 398.0ms (5.4% of total)

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

ival-pow2: 295.0ms (4% of total)

ival-sqrt: 281.0ms (3.8% of total)

ival-div: 262.0ms (3.5% of total)

ival-atan2: 238.0ms (3.2% of total)

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

exact: 11.0ms (0.1% of total)

ival-true: 7.0ms (0.1% of total)

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

Bogosity

explain826.0ms (2.5%)

Memory

1.7MiB live, 905.2MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
71	120	(-3.163076694222075e+166 -5.823868616260916e-94 9.481878256944412e+79 2.1976628896992233e+201 1.2057307439728024e+82)	0	-	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
69	121	(9.045533100855391e+60 1.5731344878639233e-306 4.034133756173954e-65 -3.809479598615385e+125 -1.4833727873014861e-283)	0	-	`(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))`
8	1	(-45178.0606696763 3.769204830594287e-143 -2.326333060731083e+31 3.282929231866901e-156 -1.1266221481901737e-253)	1	(1.1870316058776945e-240 -9.597480026532607e-148 1.2466321705156704e+170 1.2938041585369983e-51 -3.76110392572454e+214)	`(-.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))))))`
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	-	`(.f64 (.f64 (*.f64 (cos.f64 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	-	`lambda2`
0	0	-	0	-	`#s(literal 1 binary64)`
0	0	-	0	-	`phi2`
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	-	`(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))`
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	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))))))`
0	0	-	0	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	0	-	`(-.f64 lambda1 lambda2)`
0	0	-	0	-	`R`
0	0	-	0	-	`(cos.f64 phi2)`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(/.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	-	`(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	-	(.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	-	`(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))`
0	0	-	0	-	`(-.f64 phi1 phi2)`
0	0	-	0	-	`(cos.f64 phi1)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sin.f64`	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`	sensitivity	191	0
`sin.f64`	`(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))`	sensitivity	190	1
`-.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))))))`	cancellation	8	8
`+.f64`	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`	cancellation	1	1

Confusion

	Predicted +	Predicted -
+	117	0
-	124	15

Precision

0.4854771784232365

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	117	0	0
-	124	0	15

Precision?

0.4854771784232365

Recall?

1.0

Freqs

test

number	freq
0	15
1	93
2	147
3	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

485.0ms	452×	1	valid
13.0ms	60×	0	valid

Compiler

Compiled 1 239 to 108 computations (91.3% saved)

Precisions

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

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

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

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

adjust: 25.0ms (5.6% of total)

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

ival-sqrt: 14.0ms (3.1% of total)

ival-div: 13.0ms (2.9% of total)

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

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

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

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

exact: 1.0ms (0.2% of total)

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

preprocess339.0ms (1%)

Memory

-22.4MiB live, 207.0MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	233	1311
1	544	1304
2	1353	1304
3	3532	1280
4	6285	1272
0	26	65
0	45	65
1	74	65
2	132	65
3	273	65
4	523	65
5	938	65
6	1436	65
7	1727	65
8	2305	65
9	3117	65
10	4303	65
11	4791	65
12	4943	65
13	5008	65
14	5032	65
15	5201	65
16	5661	65
17	5749	65
18	5749	65
19	5757	65
20	6836	65
0	8069	63

Stop Event

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

Calls

Call 1

Inputs

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

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

Symmetry

(negabs R)

Compiler

Compiled 65 to 26 computations (60% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated
Compiler: Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

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

Compiler

Compiled 65 to 26 computations (60% saved)

simplify295.0ms (0.9%)

Memory

26.3MiB live, 147.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	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))))))))))
cost-diff	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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	384	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
cost-diff	384	(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	26	390
0	45	390
1	74	390
2	132	390
3	273	390
4	523	390
5	938	390
6	1436	390
7	1727	390
8	2305	390
9	3117	390
10	4303	390
11	4791	390
12	4943	390
13	5008	390
14	5032	390
15	5201	390
16	5661	390
17	5749	390
18	5749	390
19	5757	390
20	6836	390
0	8069	380

Stop Event

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

Calls

Call 1

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

localize366.0ms (1.1%)

Memory

-30.3MiB live, 289.9MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.3639450195368841	(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
accuracy	0.7864671408249958	(-.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	14.959949845071806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	15.298473290398354	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))

Samples

305.0ms	226×	1	valid
10.0ms	30×	0	valid

Compiler

Compiled 782 to 54 computations (93.1% saved)

Precisions

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

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

ival-cos: 60.0ms (24.3% of total)

ival-atan2: 35.0ms (14.2% of total)

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

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

adjust: 11.0ms (4.5% of total)

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

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

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

ival-pow2: 6.0ms (2.4% of total)

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

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

exact: 0.0ms (0% of total)

series64.0ms (0.2%)

Memory

0.7MiB live, 85.9MiB allocated

Counts

8 → 94

Calls

Call 1

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

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

Calls

15 calls:

Time	Variable		Point	Expression
12.0ms	phi2	@	inf	((/ (- phi1 phi2) 2) (/ (- 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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
7.0ms	lambda2	@	-inf	((/ (- phi1 phi2) 2) (/ (- 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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
6.0ms	lambda1	@	inf	((/ (- phi1 phi2) 2) (/ (- 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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
5.0ms	lambda2	@	0	((/ (- phi1 phi2) 2) (/ (- 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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
5.0ms	phi2	@	-inf	((/ (- phi1 phi2) 2) (/ (- 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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))

simplify189.0ms (0.6%)

Memory

29.6MiB live, 222.8MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	396	2840
1	1262	2817
2	4113	2708
0	8070	2559

Stop Event

1×	iter limit
1×	node limit

Counts

94 → 94

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

rewrite201.0ms (0.6%)

Memory

-15.0MiB live, 221.4MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	26	153
0	45	153
1	149	133
2	1002	129
0	8876	127

Stop Event

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

Counts

8 → 257

Calls

Call 1

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

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

eval179.0ms (0.5%)

Memory: 6.9MiB live, 210.0MiB allocated
Compiler: Compiled 60 922 to 5 031 computations (91.7% saved)

prune259.0ms (0.8%)

Memory

5.2MiB live, 246.0MiB allocated

Pruning

83 alts after pruning (83 fresh and 0 done)

	Pruned	Kept	Total
New	661	83	744
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	662	83	745

Accuracy

66.8%

Counts

745 → 83

Alt Table

Click to see full alt table

Status	Accuracy	Program
	63.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))) (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.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 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.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) #s(literal 4 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.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))) (pow.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) #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))))))))))
	59.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 12 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 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))))))))))
	59.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 12 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 8 binary64)) (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (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.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 8 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (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))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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)))))) (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))))))))))
	33.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
▶	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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.7%	(.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 1/2 binary64))) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 lambda2 #s(literal 1/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.7%	(.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 1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (.f64 lambda2 #s(literal 1/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))))))))))
	63.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 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))))))))
	62.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 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))))))
	64.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 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 2 binary64)) (.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 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
	63.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 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
	63.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) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
	63.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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.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 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))))))
	63.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))
	59.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 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 12 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))))))))
	63.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 #s(literal 1 binary64) (/.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))))))))
▶	64.7%	(.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	64.7%	(.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 (-.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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	49.3%	(.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 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 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))))))))))
	54.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 (-.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)))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.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)) (-.f64 (.f64 (sin.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	54.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 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	60.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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
	18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
▶	50.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	39.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (fma.f64 lambda1 (.f64 #s(literal -1/48 binary64) lambda1) #s(literal 1/2 binary64)))) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))))))
	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64)) lambda2 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/8 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))))
	39.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))))))))
	43.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
	53.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 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	58.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 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 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))))))))))
	34.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 (fma.f64 phi2 (+.f64 phi2 phi1) (.f64 phi1 phi1)) #s(literal 2 binary64)) (/.f64 (-.f64 phi1 phi2) (fma.f64 phi2 (+.f64 phi2 phi1) (.f64 phi1 phi1))))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	19.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 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	50.7%	(.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 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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))))))))))
	49.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 #s(approx (/ (- phi1 phi2) 2) (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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.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 #s(approx (/ (- phi1 phi2) 2) (.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))))))))))
	63.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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (pow.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))))))
	50.3%	(.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	51.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	42.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	41.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	51.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	48.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	50.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
▶	51.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (+.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) lambda2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
	52.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 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) lambda1) lambda2)) (.f64 (/.f64 #s(literal 2 binary64) lambda1) #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))))))))))
	33.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 (pow.f64 (/.f64 #s(literal 2 binary64) (.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 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))))))))))
	32.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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))))))) (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))))))))))
	17.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 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 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))))))))))
	53.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) lambda1)))))) (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))))))))))
	49.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2)))))) (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))))))))))
	46.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (fma.f64 lambda2 (.f64 #s(literal 1/48 binary64) lambda2) #s(literal -1/2 binary64)))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (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))))))))))
	42.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/8 binary64) lambda1) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1))))))) (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))))))))))
	44.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64)) lambda2 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/8 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))) (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))))))))))
▶	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (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))))))))))
	45.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (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))))))))))
	19.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	54.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi2 phi1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	50.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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 #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))))))))))
	46.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	45.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.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 #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))))))))))
	48.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal 1/2 binary64) phi1) (sin.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 #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.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	46.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (fma.f64 (.f64 phi1 phi1) (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) phi1 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	44.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	47.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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))))))))))
	48.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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))))))))))
	46.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	44.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	45.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (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))))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) phi1 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (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))))))))))
	45.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (fma.f64 (neg.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (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)) (cos.f64 phi2))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.3%	#s(approx (* 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 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))

Compiler

Compiled 14 406 to 7 084 computations (50.8% saved)

simplify216.0ms (0.7%)

Memory

-15.5MiB live, 65.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	101	2747
0	180	2724
1	278	2720
2	482	2720
3	965	2720
4	2287	2720
5	5670	2720
6	7332	2720
0	8165	2666

Stop Event

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

Calls

Call 1

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

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

localize853.0ms (2.6%)

Memory

2.6MiB live, 272.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.3639450195368841	(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
accuracy	0.7864671408249958	(-.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	14.959949845071806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	15.298473290398354	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	0.7864671408249958	(-.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	14.959949845071806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	15.298473290398354	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	31.80826697849065	#s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
accuracy	14.959949845071806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	14.959949845071806	(sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))
accuracy	15.298473290398354	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	30.109375482388756	#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
accuracy	14.959949845071806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	14.959949845071806	(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
accuracy	15.298473290398354	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	26.776974093621824	#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
accuracy	0.3639450195368841	(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
accuracy	0.7864671408249958	(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))
accuracy	14.959949845071806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	15.298473290398354	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))

Samples

664.0ms	226×	1	valid
20.0ms	30×	0	valid

Compiler

Compiled 5 283 to 176 computations (96.7% saved)

Precisions

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

ival-cos: 147.0ms (24.9% of total)

ival-sin: 125.0ms (21.2% of total)

ival-add: 88.0ms (14.9% of total)

ival-sub: 82.0ms (13.9% of total)

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

adjust: 31.0ms (5.2% of total)

ival-pow2: 23.0ms (3.9% of total)

ival-atan2: 17.0ms (2.9% of total)

ival-sqrt: 13.0ms (2.2% of total)

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

exact: 1.0ms (0.2% of total)

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

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

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

series213.0ms (0.6%)

Memory

2.9MiB live, 82.8MiB allocated

Counts

26 → 162

Calls

Call 1

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

Calls

15 calls:

Time	Variable		Point	Expression
58.0ms	phi2	@	inf	((+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (neg (* phi2 1/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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/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)))))))) (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))))))) (+ (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)))))))) (+ (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)))))))) (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda1 lambda2) 1/2)) (/ (- lambda1 lambda2) 2) (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))))))
51.0ms	lambda2	@	inf	((+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (neg (* phi2 1/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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/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)))))))) (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))))))) (+ (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)))))))) (+ (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)))))))) (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda1 lambda2) 1/2)) (/ (- lambda1 lambda2) 2) (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))))))
11.0ms	lambda1	@	inf	((+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (neg (* phi2 1/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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/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)))))))) (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))))))) (+ (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)))))))) (+ (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)))))))) (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda1 lambda2) 1/2)) (/ (- lambda1 lambda2) 2) (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))))))
10.0ms	R	@	-inf	((+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (neg (* phi2 1/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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/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)))))))) (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))))))) (+ (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)))))))) (+ (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)))))))) (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda1 lambda2) 1/2)) (/ (- lambda1 lambda2) 2) (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))))))
10.0ms	lambda2	@	-inf	((+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (neg (* phi2 1/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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/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)))))))) (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))))))) (+ (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)))))))) (+ (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)))))))) (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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))))))))) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda1 lambda2) 1/2)) (/ (- lambda1 lambda2) 2) (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))))))

simplify227.0ms (0.7%)

Memory

29.1MiB live, 145.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	566	6721
1	1844	6685
2	5322	6503
0	8074	6142

Stop Event

1×	iter limit
1×	node limit

Counts

162 → 162

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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (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)) 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 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (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)))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 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)))))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* (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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(sin (* 1/2 (- lambda1 lambda2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(+ (* (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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (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))))))
(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)))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/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)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))
(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)))))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (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 (* -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)))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(+ (* (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 phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))
(+ (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(* -1 (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/48 (* phi1 (cos (* 1/2 phi2)))) (* -1/8 (sin (* 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)))
(+ (* 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)))
(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)))))))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(pow (sin (* -1/2 phi2)) 2)
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -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))))) (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 (* 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)))
(- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))
(sin (* 1/2 (- phi1 phi2)))
(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))
(* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (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))))))
(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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(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)))
(+ (* (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)))
(* -1/2 phi2)
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (cos (* 1/2 phi1))))))
(+ (sin (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (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)))))))))
(- 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)))
(pow (sin (* 1/2 phi1)) 2)
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -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))))))))))) (pow (sin (* 1/2 phi1)) 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 (+ (* (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (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) (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))))))
(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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 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)))

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

rewrite289.0ms (0.9%)

Memory

-9.0MiB live, 193.9MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	101	1087
0	180	953
1	506	905
2	3421	881
0	8467	867

Stop Event

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

Counts

26 → 556

Calls

Call 1

Inputs
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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)))))
(neg.f64 (*.f64 phi2 #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 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(.f64 #s(literal 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))))
(.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(.f64 #s(literal 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))
(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (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 #s(literal 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (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 (.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)))))
(+.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 (*.f64 (cos.f64 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 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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))))))))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
(sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))
#s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(-.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 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (pow.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (neg.f64 (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 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 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 1 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)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (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)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 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) (cos.f64 phi1))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 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 #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 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 1 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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (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 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (pow.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (neg.f64 (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 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 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 1 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)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (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)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 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) (cos.f64 phi1))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 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 #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 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 1 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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (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 #s(literal -1 binary64) (.f64 #s(literal 1/2 binary64) phi2))
(*.f64 (neg.f64 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) phi2)
(.f64 (.f64 #s(literal 1/2 binary64) phi2) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (neg.f64 phi2))
(*.f64 phi2 #s(literal -1/2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 #s(literal 1/8 binary64) (pow.f64 phi2 #s(literal 3 binary64))))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) phi2)))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 #s(literal 1/8 binary64) (pow.f64 phi2 #s(literal 3 binary64)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64)) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 phi2 #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) phi2))
(+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) phi2))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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))))))) #s(literal 2 binary64))
(.f64 (.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) R))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(.f64 (.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) R))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))))
(pow.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))
(/.f64 (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))
(fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))
(fma.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 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (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)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (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)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (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)))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.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 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))
(+.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64))
(.f64 (.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) R))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))
(fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.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 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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))))))) #s(literal 2 binary64))
(.f64 (.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) R))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(pow.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (neg.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (+.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (exp.f64 (log.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (exp.f64 (log.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (exp.f64 (log.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (pow.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))) (neg.f64 (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (neg.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 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 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 1 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)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (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) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (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)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 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) (cos.f64 phi1))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 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 #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 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 #s(literal 1 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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (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 (.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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))))))) #s(literal 2 binary64))
(.f64 (.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))) R))
(.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(pow.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (neg.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (+.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (exp.f64 (log.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (exp.f64 (log.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (exp.f64 (log.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))
(exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (neg.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 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 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(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 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))))
(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) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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))) (neg.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (/.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (-.f64 #s(literal 1 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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 (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 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #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))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (neg.f64 (.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (neg.f64 (.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (neg.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (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 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(-.f64 (/.f64 (cos.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))
(exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))
#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
(sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))
#s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (neg.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 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 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(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 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))))
(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) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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))) (neg.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (/.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 (-.f64 #s(literal 1 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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 (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 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))

eval759.0ms (2.3%)

Memory: -99.4MiB live, 449.0MiB allocated
Compiler: Compiled 147 806 to 7 670 computations (94.8% saved)

prune530.0ms (1.6%)

Memory

-21.8MiB live, 699.9MiB allocated

Pruning

155 alts after pruning (155 fresh and 0 done)

	Pruned	Kept	Total
New	1 370	111	1 481
Fresh	34	44	78
Picked	5	0	5
Done	0	0	0
Total	1 409	155	1 564

Accuracy

68.0%

Counts

1 564 → 155

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.3%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (.f64 R #s(literal 2 binary64)))
	51.4%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	51.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	51.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	48.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	61.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) #s(literal 4 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))))))))))
	59.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 12 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 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.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 8 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (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.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	62.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	33.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/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))))))))))
	63.1%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (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))))))))))
	56.7%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #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)))))))))
	64.3%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	40.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)))) phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	40.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)))) phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	49.3%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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))))))))))
	51.8%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	58.2%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	50.2%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	50.7%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	51.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	44.4%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
	51.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	62.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	50.7%	(.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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	46.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	38.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	64.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	50.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	50.7%	(.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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.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 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))))))))
	62.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 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #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)))))))))
	63.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 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
	63.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) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
	63.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
▶	45.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) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	61.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 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))))))
	63.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))
	59.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 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 12 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))))))))
	63.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 #s(literal 1 binary64) (/.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) (-.f64 lambda1 lambda2))) #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 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))))))))
	52.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) phi2) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (.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))))))))))
	49.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))))
▶	42.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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	63.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)) (-.f64 (.f64 (sin.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	54.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 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	60.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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
	18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64)) lambda2 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/8 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))))
	45.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)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	51.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)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	53.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 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	58.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 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 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))))))))))
	19.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 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	50.7%	(.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 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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))))))))))
	49.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 #s(approx (/ (- phi1 phi2) 2) (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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.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 #s(approx (/ (- phi1 phi2) 2) (.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))))))))))
	41.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 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	40.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 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.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 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	51.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 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	63.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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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 #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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
▶	41.3%	(.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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	63.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (pow.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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))))))
	52.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) #s(approx (+ (pow (+ ( (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
	49.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) #s(approx (+ (pow (+ ( (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
	51.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	42.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	41.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	51.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	48.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	50.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 #s(approx (- 1 (+ (pow (+ ( (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) lambda2) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (+.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) lambda2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
	33.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 (pow.f64 (/.f64 #s(literal 2 binary64) (.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 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))))))))))
	32.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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))))))) (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))))))))))
	17.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 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 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))))))))))
	53.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) lambda1)))))) (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))))))))))
	49.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2)))))) (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))))))))))
	37.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal -1/8 binary64))) lambda2 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	35.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	34.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 1/2 binary64))) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	42.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/8 binary64) lambda1) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1))))))) (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))))))))))
	35.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	24.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))))))
	40.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	29.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) phi1 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
	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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	39.7%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	44.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	35.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	19.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	54.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi2 phi1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	50.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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 #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))))))))))
	45.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.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 #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))))))))))
	36.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 #s(literal 1/2 binary64) phi1) (sin.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	46.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	37.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	33.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	52.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	40.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	38.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (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 phi2 phi1))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	56.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	42.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	61.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	49.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.4%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	61.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	49.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	49.8%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	35.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (fma.f64 (.f64 (neg.f64 phi2) (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)))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (fma.f64 (.f64 (neg.f64 phi2) (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)))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	47.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	37.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	47.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	47.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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))))))))))
	49.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #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))))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	39.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	35.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	50.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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))))))))))
	39.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
▶	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	38.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (neg.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) lambda2 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	36.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	32.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	50.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	49.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	40.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	45.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	31.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	36.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	36.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 lambda2 (neg.f64 (cos.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	32.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) phi1 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.0%	(.f64 R (.f64 #s(literal 2 binary64) #s(approx (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 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	63.8%	#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
▶	65.0%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))

Compiler

Compiled 29 002 to 15 050 computations (48.1% saved)

simplify173.0ms (0.5%)

Memory

16.1MiB live, 173.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	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) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
cost-diff	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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	6464	(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64))
cost-diff	20928	(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
cost-diff	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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
cost-diff	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))
cost-diff	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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	12800	(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
cost-diff	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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))))))
cost-diff	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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
cost-diff	128	(+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))
cost-diff	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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	0	(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
cost-diff	0	(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
cost-diff	0	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
cost-diff	0	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
cost-diff	0	(atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
cost-diff	0	(*.f64 #s(literal 2 binary64) R)
cost-diff	0	(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
cost-diff	0	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	134	2969
0	228	2958
1	377	2926
2	703	2926
3	1787	2843
4	4296	2836
0	8436	2790

Stop Event

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

Calls

Call 1

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

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

localize1.2s (3.8%)

Memory

17.3MiB live, 1 390.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	14.255063339686094	(sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
accuracy	14.560213637859281	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	14.560213637859281	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
accuracy	28.156204053447517	#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
accuracy	13.846206859047806	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
accuracy	13.846206859047806	(sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))
accuracy	14.560213637859281	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	28.156204053447517	#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
accuracy	13.846206859047806	(sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))
accuracy	14.560213637859281	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	28.156204053447517	#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
accuracy	32.814037611892786	#s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
accuracy	0.5741554018538712	(-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
accuracy	13.846206859047806	(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
accuracy	25.13097604298267	#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
accuracy	26.23205963871004	#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
accuracy	0.37109375	(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
accuracy	0.7708421408249958	(-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
accuracy	13.846206859047806	(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
accuracy	14.560213637859281	(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))

Samples

924.0ms	211×	1	valid
60.0ms	16×	1	invalid
27.0ms	28×	0	valid
1.0ms	1×	0	invalid

Compiler

Compiled 5 551 to 248 computations (95.5% saved)

Precisions

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

ival-sin: 338.0ms (37.5% of total)

ival-cos: 174.0ms (19.3% of total)

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

ival-pow2: 68.0ms (7.6% of total)

adjust: 52.0ms (5.8% of total)

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

ival-sqrt: 26.0ms (2.9% of total)

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

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

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

ival-pow: 11.0ms (1.2% of total)

ival-neg: 1.0ms (0.1% of total)

exact: 1.0ms (0.1% of total)

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

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

series171.0ms (0.5%)

Memory

18.5MiB live, 214.2MiB allocated

Counts

32 → 195

Calls

Call 1

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

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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(* 2 R)
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 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))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (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)) 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)))))))))))
(+ (* (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)))
(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)))))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* -1/2 lambda2)) 2)
(+ (* lambda1 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (pow (sin (* -1/2 lambda2)) 2))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (pow (sin (* -1/2 lambda2)) 2))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 lambda2)) 2)) (* lambda1 (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (pow (sin (* -1/2 lambda2)) 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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(* -1/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(sqrt (+ (* (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))
(sin (* 1/2 (- lambda1 lambda2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 (- lambda1 lambda2))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (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))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/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)))))))))))
(+ (* (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)))
(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)))))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 lambda1)) 2)
(+ (* -1 (* lambda2 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (pow (sin (* 1/2 lambda1)) 2))
(+ (* lambda2 (+ (* -1 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* lambda2 (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (pow (sin (* 1/2 lambda1)) 2))
(+ (* lambda2 (+ (* -1 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* lambda2 (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 lambda1)) 2)) (* lambda2 (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))))) (pow (sin (* 1/2 lambda1)) 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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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 (* -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 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 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(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)))))))))))
(+ (* (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)))
(/ 1 (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (/ (* phi1 (cos (* 1/2 phi2))) (pow (sin (* 1/2 phi2)) 3))) (/ 1 (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (- (* phi1 (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi2)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4)))))) (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3)))) (/ 1 (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (pow (sin (* 1/2 phi2)) 5))) (+ (* -1/8 (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3))) (+ (* -1/24 (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3))) (/ (* (cos (* 1/2 phi2)) (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi2)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4)))))) (sin (* 1/2 phi2)))))))) (* 1/4 (/ 1 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4)))))) (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3)))) (/ 1 (pow (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)))))))))
(- 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 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* -1 (* (pow phi1 2) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (- 1/48 (* 1/24 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ 1/48 (* -1 (* (pow phi1 2) (+ 1/1440 (* -1/720 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* 1/24 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(pow (sin (* -1/2 phi2)) 2)
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -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))))) (pow (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)))))))))
(/ 1 (pow (sin (* 1/2 (+ phi1 phi2))) 2))
(sin (* 1/2 (- phi1 phi2)))
(pow (sin (* 1/2 (- phi1 phi2))) 2)
(sin (* 1/2 (+ phi1 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 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (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))
(/ 1 (pow (sin (* 1/2 (- phi2 (* -1 phi1)))) 2))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)
(sin (* 1/2 (- phi2 (* -1 phi1))))
(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)))))))))))
(+ (* (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)))
(/ 1 (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (/ (* phi2 (cos (* 1/2 phi1))) (pow (sin (* 1/2 phi1)) 3))) (/ 1 (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (- (* phi2 (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4)))))) (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3)))) (/ 1 (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 (sin (* 1/2 phi1)) 5))) (+ (* -1/8 (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/24 (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3))) (/ (* (cos (* 1/2 phi1)) (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4)))))) (sin (* 1/2 phi1)))))))) (* 1/4 (/ 1 (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4)))))) (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3)))) (/ 1 (pow (sin (* 1/2 phi1)) 2)))
(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)))))))))
(- 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 (* 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)))
(pow (sin (* 1/2 phi1)) 2)
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -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))))))))))) (pow (sin (* 1/2 phi1)) 2))
(+ (sin (* 1/2 phi1)) (* 1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/8 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (cos (* 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)))))))))
(* 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 (+ (* (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (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))
(/ 1 (pow (sin (* 1/2 (- phi1 (* -1 phi2)))) 2))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)
(sin (* 1/2 (- phi1 (* -1 phi2))))

Calls

15 calls:

Time	Variable		Point	Expression
32.0ms	lambda2	@	-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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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) (* (* (* (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)))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2))))))))) (+ (* (pow (* (sin (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2))))) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 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 (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2)))))))))) (sin (* (- phi1 phi2) 1/2)) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow (sin (/ (- phi1 phi2) 2)) 2) (/ (- lambda1 lambda2) 2) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 (- lambda1 lambda2))) (sin (* 1/2 (- phi1 phi2))) (sin (* 1/2 (+ phi2 phi1))))
26.0ms	lambda1	@	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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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) (* (* (* (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)))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2))))))))) (+ (* (pow (* (sin (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2))))) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 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 (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2)))))))))) (sin (* (- phi1 phi2) 1/2)) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow (sin (/ (- phi1 phi2) 2)) 2) (/ (- lambda1 lambda2) 2) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 (- lambda1 lambda2))) (sin (* 1/2 (- phi1 phi2))) (sin (* 1/2 (+ phi2 phi1))))
11.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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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) (* (* (* (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)))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2))))))))) (+ (* (pow (* (sin (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2))))) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 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 (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2)))))))))) (sin (* (- phi1 phi2) 1/2)) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow (sin (/ (- phi1 phi2) 2)) 2) (/ (- lambda1 lambda2) 2) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 (- lambda1 lambda2))) (sin (* 1/2 (- phi1 phi2))) (sin (* 1/2 (+ phi2 phi1))))
11.0ms	phi2	@	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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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) (* (* (* (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)))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2))))))))) (+ (* (pow (* (sin (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2))))) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 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 (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2)))))))))) (sin (* (- phi1 phi2) 1/2)) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow (sin (/ (- phi1 phi2) 2)) 2) (/ (- lambda1 lambda2) 2) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 (- lambda1 lambda2))) (sin (* 1/2 (- phi1 phi2))) (sin (* 1/2 (+ phi2 phi1))))
10.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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (sin (* (- phi1 phi2) 1/2)) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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) (* (* (* (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)))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2))))))))) (+ (* (pow (* (sin (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2))))) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 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 (* 1/2 (+ phi2 phi1))) (sin (* 1/2 (- phi1 phi2)))) 2) (pow (pow (sin (* 1/2 (+ phi2 phi1))) -1) 2)) (* (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos phi1))) (sin (* 1/2 (- lambda1 lambda2)))))))))) (sin (* (- phi1 phi2) 1/2)) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow (sin (/ (- phi1 phi2) 2)) 2) (/ (- lambda1 lambda2) 2) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 (- lambda1 lambda2))) (sin (* 1/2 (- phi1 phi2))) (sin (* 1/2 (+ phi2 phi1))))

simplify202.0ms (0.6%)

Memory

-7.5MiB live, 177.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	863	8883
1	2790	8625
0	8874	8201

Stop Event

1×	iter limit
1×	node limit

Counts

195 → 195

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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(* 2 R)
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 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))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (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)) 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)))))))))))
(+ (* (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)))
(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)))))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* -1/2 lambda2)) 2)
(+ (* lambda1 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (pow (sin (* -1/2 lambda2)) 2))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (pow (sin (* -1/2 lambda2)) 2))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 lambda2)) 2)) (* lambda1 (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (pow (sin (* -1/2 lambda2)) 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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(* -1/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(sqrt (+ (* (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))
(sin (* 1/2 (- lambda1 lambda2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 (- lambda1 lambda2))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (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))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/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)))))))))))
(+ (* (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)))
(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)))))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 lambda1)) 2)
(+ (* -1 (* lambda2 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (pow (sin (* 1/2 lambda1)) 2))
(+ (* lambda2 (+ (* -1 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* lambda2 (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (pow (sin (* 1/2 lambda1)) 2))
(+ (* lambda2 (+ (* -1 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* lambda2 (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 lambda1)) 2)) (* lambda2 (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))))) (pow (sin (* 1/2 lambda1)) 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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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 (* -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 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 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(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)))))))))))
(+ (* (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)))
(/ 1 (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (/ (* phi1 (cos (* 1/2 phi2))) (pow (sin (* 1/2 phi2)) 3))) (/ 1 (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (- (* phi1 (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi2)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4)))))) (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3)))) (/ 1 (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (pow (sin (* 1/2 phi2)) 5))) (+ (* -1/8 (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3))) (+ (* -1/24 (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3))) (/ (* (cos (* 1/2 phi2)) (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi2)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4)))))) (sin (* 1/2 phi2)))))))) (* 1/4 (/ 1 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 4)))))) (/ (cos (* 1/2 phi2)) (pow (sin (* 1/2 phi2)) 3)))) (/ 1 (pow (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)))))))))
(- 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 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* -1 (* (pow phi1 2) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (- 1/48 (* 1/24 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ 1/48 (* -1 (* (pow phi1 2) (+ 1/1440 (* -1/720 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* 1/24 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(pow (sin (* -1/2 phi2)) 2)
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -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))))) (pow (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)))))))))
(/ 1 (pow (sin (* 1/2 (+ phi1 phi2))) 2))
(sin (* 1/2 (- phi1 phi2)))
(pow (sin (* 1/2 (- phi1 phi2))) 2)
(sin (* 1/2 (+ phi1 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 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (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))
(/ 1 (pow (sin (* 1/2 (- phi2 (* -1 phi1)))) 2))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)
(sin (* 1/2 (- phi2 (* -1 phi1))))
(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)))))))))))
(+ (* (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)))
(/ 1 (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (/ (* phi2 (cos (* 1/2 phi1))) (pow (sin (* 1/2 phi1)) 3))) (/ 1 (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (- (* phi2 (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4)))))) (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3)))) (/ 1 (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 (sin (* 1/2 phi1)) 5))) (+ (* -1/8 (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/24 (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3))) (/ (* (cos (* 1/2 phi1)) (- (* 1/4 (/ 1 (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4)))))) (sin (* 1/2 phi1)))))))) (* 1/4 (/ 1 (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 4)))))) (/ (cos (* 1/2 phi1)) (pow (sin (* 1/2 phi1)) 3)))) (/ 1 (pow (sin (* 1/2 phi1)) 2)))
(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)))))))))
(- 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 (* 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)))
(pow (sin (* 1/2 phi1)) 2)
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -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))))))))))) (pow (sin (* 1/2 phi1)) 2))
(+ (sin (* 1/2 phi1)) (* 1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/8 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (cos (* 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)))))))))
(* 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 (+ (* (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (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))
(/ 1 (pow (sin (* 1/2 (- phi1 (* -1 phi2)))) 2))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)
(sin (* 1/2 (- phi1 (* -1 phi2))))

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

rewrite243.0ms (0.7%)

Memory

6.3MiB live, 207.1MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	134	1330
0	228	1193
1	767	1171
2	5160	1171
0	8265	1164

Stop Event

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

Counts

32 → 598

Calls

Call 1

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

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

eval230.0ms (0.7%)

Memory: 16.6MiB live, 243.3MiB allocated
Compiler: Compiled 97 494 to 5 614 computations (94.2% saved)

prune466.0ms (1.4%)

Memory

7.9MiB live, 658.5MiB allocated

Pruning

163 alts after pruning (163 fresh and 0 done)

	Pruned	Kept	Total
New	776	66	842
Fresh	53	97	150
Picked	5	0	5
Done	0	0	0
Total	834	163	997

Accuracy

80.2%

Counts

997 → 163

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.4%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	51.3%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) R))
	49.4%	(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
	51.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	48.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	61.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) #s(literal 4 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))))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	62.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
▶	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	33.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/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))))))))))
	63.1%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (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))))))))))
	49.3%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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))))))))))
	58.2%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	50.2%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	50.7%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	51.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	44.4%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
	51.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	62.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	50.7%	(.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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	46.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	38.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	64.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	50.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	50.7%	(.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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.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 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
	63.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) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
	44.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) (fma.f64 (pow.f64 (.f64 (fma.f64 (+.f64 (sin.f64 (.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	45.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.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) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	36.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) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 #s(approx (sin (* 1/2 (+ phi2 phi1))) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	61.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 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (.f64 (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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (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 4 binary64)))))))))
	49.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	41.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal -1/2 binary64) lambda2))))))))))
	63.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)) (-.f64 (.f64 (sin.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	54.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 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64)) lambda2 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/8 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))))
	42.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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.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)) #s(approx (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	51.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)) #s(approx (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	58.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 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 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))))))))))
	50.7%	(.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 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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))))))))))
	48.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 #s(approx (/ (- phi1 phi2) 2) (.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))))))))))
	41.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 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.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 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	51.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 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	63.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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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 #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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	42.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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) lambda1))))))))))
	39.3%	(.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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2))))))))))
	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)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal -1/2 binary64) lambda2))))))))))
	50.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 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))))
	42.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	51.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	48.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	50.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 #s(approx (- 1 (+ (pow (+ ( (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) lambda2) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (+.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) lambda2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
	33.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 (pow.f64 (/.f64 #s(literal 2 binary64) (.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 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))))))))))
	32.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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))))))) (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))))))))))
	17.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 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 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))))))))))
	53.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) lambda1)))))) (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))))))))))
	49.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2)))))) (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))))))))))
	37.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal -1/8 binary64))) lambda2 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	34.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 1/2 binary64))) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	42.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/8 binary64) lambda1) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1))))))) (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))))))))))
	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	24.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))))))
	40.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	44.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	35.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	19.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	54.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi2 phi1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	50.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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 #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))))))))))
	45.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.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 #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))))))))))
	36.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 #s(literal 1/2 binary64) phi1) (sin.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	37.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	33.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	40.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (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 phi2 phi1))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	56.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	61.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	49.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.4%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	61.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	49.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	49.8%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	47.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	47.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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))))))))))
	49.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #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))))))))))
	41.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	34.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	33.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	30.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	39.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	35.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	50.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	39.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
▶	43.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 4 binary64)))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 4 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 phi1))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1))))))))
	33.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (.f64 (neg.f64 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1))))))))
	40.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (cos.f64 phi1))))))))
	38.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (cos.f64 phi1))))))))
	31.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (cos.f64 phi1))))))))
	39.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	37.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
▶	35.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	46.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	46.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	26.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	36.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	49.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	40.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	36.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	41.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	39.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
▶	30.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	26.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	32.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) phi1 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	35.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	34.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (.f64 (neg.f64 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	38.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	33.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	30.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	48.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (exp.f64 (.f64 (log.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	37.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) (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) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	36.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #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))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.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 (sqrt.f64 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.0%	(.f64 R (.f64 #s(literal 2 binary64) #s(approx (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 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	63.8%	#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/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 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
	78.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
▶	78.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	65.4%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	59.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	72.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.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))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	63.2%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sin.f64 (.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	59.2%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	78.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.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) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	65.0%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
	65.1%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	52.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	49.5%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	50.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	51.4%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	50.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (* (- phi1 phi2) 1/2)) (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/8 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	48.1%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (* (- phi1 phi2) 1/2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	47.2%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (* (- phi1 phi2) 1/2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	51.0%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin ( (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	45.7%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin ( (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))

Compiler

Compiled 33 838 to 17 074 computations (49.5% saved)

simplify225.0ms (0.7%)

Memory

-13.7MiB live, 138.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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	0	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 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	128	(+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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	0	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))))))))
cost-diff	0	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
cost-diff	128	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))
cost-diff	12800	(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
cost-diff	0	(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
cost-diff	0	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
cost-diff	0	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
cost-diff	6528	(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
cost-diff	0	(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
cost-diff	0	(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
cost-diff	0	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
cost-diff	0	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
cost-diff	0	(atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
cost-diff	0	(*.f64 #s(literal 2 binary64) R)
cost-diff	0	(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
cost-diff	0	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	142	3196
0	239	3184
1	385	3166
2	664	3166
3	1479	3154
4	3756	3154
0	8322	3104

Stop Event

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

Calls

Call 1

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

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

localize1.2s (3.6%)

Memory

17.5MiB live, 1 057.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.3405075195368841	(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
accuracy	0.7708421408249958	(-.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	13.846206859047806	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy	14.560213637859281	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	14.560213637859281	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy	14.560213637859281	(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
accuracy	26.307180566168757	#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
accuracy	28.156204053447517	#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
accuracy	0.7369918326153114	(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
accuracy	13.846206859047806	(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
accuracy	26.23205963871004	#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
accuracy	28.74550920332106	#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
accuracy	13.846206859047806	(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
accuracy	23.042551087165833	#s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
accuracy	25.13097604298267	#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
accuracy	26.23205963871004	#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
accuracy	0.3405075195368841	(pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
accuracy	0.37109375	(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
accuracy	0.7708421408249958	(-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
accuracy	13.846206859047806	(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))

Samples

920.0ms	214×	1	valid
66.0ms	16×	1	invalid
23.0ms	25×	0	valid
1.0ms	1×	0	invalid

Compiler

Compiled 5 714 to 260 computations (95.4% saved)

Precisions

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

ival-sin: 238.0ms (28.1% of total)

ival-cos: 196.0ms (23.1% of total)

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

adjust: 79.0ms (9.3% of total)

ival-pow2: 68.0ms (8% of total)

ival-sqrt: 50.0ms (5.9% of total)

ival-add: 38.0ms (4.5% of total)

ival-atan2: 29.0ms (3.4% of total)

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

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

exact: 1.0ms (0.1% of total)

ival-neg: 1.0ms (0.1% of total)

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

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

series188.0ms (0.6%)

Memory

-2.6MiB live, 191.1MiB allocated

Counts

36 → 221

Calls

Call 1

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

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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(* 2 R)
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 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))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (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)) 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)))))))))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (+ (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 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)))))))))
(+ (* (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 lambda2)) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 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)) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* -1/2 lambda2)) 2)
(+ (* lambda1 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (pow (sin (* -1/2 lambda2)) 2))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (pow (sin (* -1/2 lambda2)) 2))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 lambda2)) 2)) (* lambda1 (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (pow (sin (* -1/2 lambda2)) 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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 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 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (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 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (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 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 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)))
(sin (* 1/2 (- lambda1 lambda2)))
(+ (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 (- lambda1 lambda2))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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))))))
(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)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(+ (* (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 (+ (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/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)))))))))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (+ (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(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)))))))))
(+ (* (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)) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 lambda1)) 2)
(+ (* -1 (* lambda2 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (pow (sin (* 1/2 lambda1)) 2))
(+ (* lambda2 (+ (* -1 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* lambda2 (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (pow (sin (* 1/2 lambda1)) 2))
(+ (* lambda2 (+ (* -1 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* lambda2 (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 lambda1)) 2)) (* lambda2 (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))))) (pow (sin (* 1/2 lambda1)) 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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (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) (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 (* -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 phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(+ (* (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 (+ (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 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 (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(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)))))))))))
(- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* phi1 (+ (* -1 (* phi1 (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* 1/2 phi2)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* phi1 (+ (* 1/2 phi2) (* phi1 (- (* -1/12 (* phi1 phi2)) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 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)))
(- 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)))
(pow (sin (* -1/2 phi2)) 2)
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (+ (* phi1 (+ (* -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))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (* -1 (* (pow phi1 2) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (- 1/48 (* 1/24 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ 1/48 (* -1 (* (pow phi1 2) (+ 1/1440 (* -1/720 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* 1/24 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (pow (sin (* 1/2 (- lambda1 lambda2))) 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)))))))))
(pow (+ (* (cos (* -1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)
(sin (* 1/2 (- phi1 phi2)))
(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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 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) (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))))))
(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)))))
(sqrt (+ (* (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))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 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)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(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)))))))))))
(+ (* (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)))
(- (+ 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)))
(pow (sin (* 1/2 phi1)) 2)
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* -1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -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))))))))))) (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)))
(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)))))))))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -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))))))))))) (pow (sin (* 1/2 phi1)) 2))
(* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))
(* phi2 (- (+ (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (/ 1 phi2)) (+ (/ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) 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 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (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) (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))))))
(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)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(* -1 (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1 (/ (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) phi2)))))
(+ (* (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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 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 (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (sqrt (- 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)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)

Calls

15 calls:

Time	Variable		Point	Expression
40.0ms	phi1	@	-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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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))))) (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 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)))))))) (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))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))))))) (+ (pow (+ (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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)))))))) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (/ (- lambda1 lambda2) 2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi1 phi2) 1/2)) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
23.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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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))))) (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 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)))))))) (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))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))))))) (+ (pow (+ (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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)))))))) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (/ (- lambda1 lambda2) 2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi1 phi2) 1/2)) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
13.0ms	phi2	@	-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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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))))) (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 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)))))))) (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))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))))))) (+ (pow (+ (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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)))))))) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (/ (- lambda1 lambda2) 2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi1 phi2) 1/2)) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
12.0ms	lambda2	@	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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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))))) (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 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)))))))) (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))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))))))) (+ (pow (+ (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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)))))))) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (/ (- lambda1 lambda2) 2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi1 phi2) 1/2)) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))
12.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 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 2 R) (atan2 (sqrt (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2)))) 2))) (sqrt (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 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)))))))) (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))))) (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 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)))))))) (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))))))) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/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)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))))))) (+ (pow (+ (* (sin (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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 (* 1/2 phi1)) (cos (* -1/2 phi2))) (* (sin (* -1/2 phi2)) (cos (* 1/2 phi1)))) 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)))))))) (sin (* (- lambda1 lambda2) 1/2)) (- 1 (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (+ (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))))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (/ (- lambda1 lambda2) 2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi1 phi2) 1/2)) (sin (/ (- phi1 phi2) 2)) (sin (/ (- lambda1 lambda2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (pow (sin (/ (- phi1 phi2) 2)) 2))

simplify223.0ms (0.7%)

Memory

12.7MiB live, 241.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	849	10603
1	2774	10365
0	8892	9828

Stop Event

1×	iter limit
1×	node limit

Counts

221 → 221

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

rewrite238.0ms (0.7%)

Memory

11.1MiB live, 248.4MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	142	1908
0	239	1796
1	800	1577
2	5144	1541
0	8157	1540

Stop Event

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

Counts

36 → 654

Calls

Call 1

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

Outputs
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) R) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) R))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) R))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
(atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) R))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))))))))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))))))
(.f64 (pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(exp.f64 (.f64 (log.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (-.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (-.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (-.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (-.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (-.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 phi2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(-.f64 (-.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(-.f64 (-.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(-.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (/.f64 (pow.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(+.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 #s(literal 2 binary64) R))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) R))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 #s(literal 1 binary64) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))
(fabs.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(pow.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.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 1/2 binary64))))) #s(literal 1 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi2)) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) R))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(pow.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #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)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.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 1/2 binary64))))) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi2)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal -1 binary64)))
(.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(pow.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #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)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.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 1/2 binary64))))) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi2)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) R) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) R)
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) R))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) R))
(.f64 R (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 #s(literal 1 binary64) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))
(fabs.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64))))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 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 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/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 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))))
(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))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 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 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(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 phi2)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(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) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))
(-.f64 (pow.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (.f64 #s(literal 1 binary64) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (.f64 #s(literal 1 binary64) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 4 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.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 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (*.f64 (-.f64 phi1 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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #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) phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))))
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))))
#s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 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 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 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 binary64) (pow.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 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 binary64) (pow.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64))
(-.f64 (pow.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 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 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (neg.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
#s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (neg.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (neg.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 4 binary64))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(fma.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 (neg.f64 phi1) #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 (neg.f64 phi1) #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) phi1)))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi2 (.f64 #s(literal -1/2 binary64) phi1)))) (.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi2 (.f64 #s(literal -1/2 binary64) phi1)))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 (neg.f64 phi1) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 (neg.f64 phi1) #s(literal -1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) phi1)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (neg.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (neg.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 4 binary64))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(fma.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 (neg.f64 phi1) #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 (neg.f64 phi1) #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) phi1)))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi1 #s(literal 0 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi2 (.f64 #s(literal -1/2 binary64) phi1)))) (.f64 #s(literal 1 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi2 (.f64 #s(literal -1/2 binary64) phi1)))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 (neg.f64 phi1) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 (neg.f64 phi1) #s(literal -1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) phi1)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 #s(literal 1 binary64) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))
(fabs.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (neg.f64 (.f64 lambda2 #s(literal 1/2 binary64))))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (+.f64 (pow.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 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 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/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 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))))
(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))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 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 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(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 phi2)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(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) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))
(-.f64 (pow.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (.f64 (.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.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 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(/.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (pow.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.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 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2)))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (.f64 #s(literal 1/2 binary64) phi2))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (*.f64 (-.f64 phi1 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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #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) phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))))

eval279.0ms (0.8%)

Memory: 23.9MiB live, 473.0MiB allocated
Compiler: Compiled 101 965 to 5 290 computations (94.8% saved)

prune960.0ms (2.9%)

Memory

-61.7MiB live, 1 099.6MiB allocated

Pruning

174 alts after pruning (174 fresh and 0 done)

	Pruned	Kept	Total
New	691	51	742
Fresh	35	123	158
Picked	5	0	5
Done	0	0	0
Total	731	174	905

Accuracy

80.3%

Counts

905 → 174

Alt Table

Click to see full alt table

Status	Accuracy	Program
	49.4%	(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
	35.7%	(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
	42.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
	35.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	51.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2)) (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)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	61.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) #s(literal 4 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))))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	62.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #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))))))))))
	63.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/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))))))))))
	63.1%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (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))))))))))
	63.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	51.5%	(.f64 R (.f64 #s(literal 2 binary64) (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 (.f64 (cos.f64 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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	50.7%	(.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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	46.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	38.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	64.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	50.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	50.7%	(.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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	63.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) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (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) (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
	51.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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	41.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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal -1/2 binary64) lambda2))))))))))
	63.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)) (-.f64 (.f64 (sin.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	54.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 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
	43.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64)) lambda2 (.f64 (fma.f64 lambda2 (.f64 #s(literal -1/8 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))))
	42.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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.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)) #s(approx (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	58.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 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 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))))))))))
	50.7%	(.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 #s(approx (/ (- phi1 phi2) 2) (.f64 (fma.f64 (/.f64 phi1 phi2) #s(literal 1/2 binary64) #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))))))))))
	48.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 #s(approx (/ (- phi1 phi2) 2) (.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))))))))))
	41.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 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.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 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	51.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 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	63.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 #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 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	51.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 #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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	42.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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) lambda1))))))))))
	39.3%	(.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 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2))))))))))
	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)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal -1/2 binary64) lambda2))))))))))
	42.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	48.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	50.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 #s(approx (- 1 (+ (pow (+ ( (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) lambda2) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	45.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (+.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) lambda2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)))))))
	32.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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))))))) (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))))))))))
	17.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 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 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))))))))))
	53.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) lambda1)))))) (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))))))))))
	49.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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2)))))) (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))))))))))
	34.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 1/2 binary64))) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	42.3%	(.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 lambda1 (.f64 #s(literal -1/8 binary64) lambda1) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1))))))) (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))))))))))
	24.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) #s(literal -1/2 binary64))) lambda2 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))))))
	40.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	44.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	19.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	45.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (.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 #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))))))))))
	36.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 #s(literal 1/2 binary64) phi1) (sin.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	37.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	33.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	40.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	44.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (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 phi2 phi1))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	61.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	63.4%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	61.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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))))))))))
	49.7%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	49.8%	(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	47.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	49.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (* phi1 1/2)) (cos (* phi2 1/2))) (* (cos (* phi1 1/2)) (sin (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #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))))))))))
	41.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	18.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sqrt.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	34.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))))
	33.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	30.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	39.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	35.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	50.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (.f64 phi2 #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))))))))))
	39.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	43.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (fma.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 4 binary64)))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 4 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 phi1))))))))
	49.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1))))))))
	40.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (cos.f64 phi1))))))))
	38.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (cos.f64 phi1))))))))
	31.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (cos.f64 phi1))))))))
	39.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	37.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	35.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
	35.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))))))
	31.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))
	28.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))
	26.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)))) (fma.f64 (.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
	7.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
	43.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* 1/2 phi1))) (- 1 (+ (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)))) (neg.f64 (.f64 (neg.f64 phi2) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) phi2))))))))))
	32.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	46.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	46.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	32.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	36.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	45.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (neg.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	49.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	40.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	41.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	39.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	30.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	30.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1)))))) #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)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	34.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) lambda2))))))))))
	32.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
	30.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	32.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	31.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/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 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	19.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (fma.f64 (.f64 (neg.f64 phi2) (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)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	26.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin (/ (- phi1 phi2) 2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (.f64 #s(literal 1/2 binary64) lambda1))))))))))
	34.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	36.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	32.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	43.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	41.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
	32.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) phi1 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	34.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	35.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) lambda2 (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	34.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (.f64 (neg.f64 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	25.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (.f64 (neg.f64 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	23.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (.f64 lambda1 lambda1) (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	38.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	28.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	33.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	23.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	20.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	48.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (exp.f64 (.f64 (log.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	35.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (exp.f64 (.f64 (log.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	37.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) (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) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	36.7%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda2) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #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))) (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.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 (sqrt.f64 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
	35.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	31.3%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.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 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	26.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	63.0%	(.f64 R (.f64 #s(literal 2 binary64) #s(approx (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 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
	78.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	63.8%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
	58.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 phi1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))))))))
	63.8%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 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 1/2 binary64))))))))))))
	50.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(approx (pow (+ ( (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	49.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(approx (pow (+ ( (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	78.7%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	53.7%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (fma.f64 (.f64 (neg.f64 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	60.8%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	59.7%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	51.0%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	59.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	72.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.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))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	63.2%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sin.f64 (.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	59.2%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 3 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	78.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.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) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	65.0%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
	65.1%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	52.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	49.5%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	50.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	51.4%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
	50.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (* (- phi1 phi2) 1/2)) (fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/8 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	48.1%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (* (- phi1 phi2) 1/2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	47.2%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (* (- phi1 phi2) 1/2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	75.6%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	59.3%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin ( (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	51.0%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin ( (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	55.8%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin ( (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
	45.7%	#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(approx (pow (sin ( (- lambda1 lambda2) 1/2)) 2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))

Compiler

Compiled 52 029 to 12 066 computations (76.8% saved)

regimes1.3s (4%)

Memory

49.4MiB live, 1 829.3MiB allocated

Counts

312 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

157.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
144.0ms	phi2
139.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
111.0ms	lambda2
102.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))))))))))

Results

Accuracy	Segments	Branch
78.7%	1	`R`
78.7%	1	`lambda1`
78.7%	1	`lambda2`
78.7%	1	`phi1`
78.7%	1	`phi2`
78.7%	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))))))))))
78.7%	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)))))))))
78.7%	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))))))))
78.7%	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)))))`
78.7%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
78.7%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
78.7%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes1.1s (3.4%)

Memory

21.4MiB live, 1 442.4MiB allocated

Counts

260 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

132.0ms	(-.f64 lambda1 lambda2)
119.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))))))))
115.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
93.0ms	lambda2
91.0ms	lambda1

Results

Accuracy	Segments	Branch
78.6%	1	`phi2`
78.6%	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)))))))))
78.6%	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))))))))
78.6%	1	`R`
78.6%	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))))))))))
78.6%	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)))))`
78.6%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
78.6%	1	`lambda2`
78.6%	1	`lambda1`
78.6%	1	`phi1`
78.6%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
78.6%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes1.3s (4%)

Memory

1.1MiB live, 1 311.5MiB allocated

Counts

257 → 2

Calls

Call 1

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

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

Calls

12 calls:

159.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
153.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
135.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))))))))))
123.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))))))))
109.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
75.6%	1	`phi2`
78.6%	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 (.f64 (.f64 (cos.f64 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)))))))))
78.6%	2	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))
75.6%	1	`R`
75.6%	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))))))))))
78.4%	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)))))`
75.6%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
75.6%	1	`lambda2`
75.6%	1	`phi1`
75.6%	1	`lambda1`
75.6%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
75.6%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes1.2s (3.6%)

Memory

7.6MiB live, 1 545.8MiB allocated

Counts

243 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

149.0ms	(.f64 #s(literal 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)))))))))
139.0ms	(-.f64 lambda1 lambda2)
123.0ms	lambda1
114.0ms	R
101.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
65.1%	1	`R`
65.1%	1	`lambda2`
65.1%	1	`phi1`
65.1%	1	`phi2`
65.1%	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))))))))))
65.1%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
65.1%	1	`lambda1`
65.1%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
65.1%	1	`(-.f64 lambda1 lambda2)`
65.1%	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)))))`
65.1%	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)))))))))
65.1%	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))))))))

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes546.0ms (1.7%)

Memory

-13.0MiB live, 791.8MiB allocated

Counts

161 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

46.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))))))))))
46.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
44.0ms	(.f64 #s(literal 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)))))))))
43.0ms	lambda2
43.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
63.3%	1	`phi1`
63.3%	1	`phi2`
63.3%	1	`lambda1`
63.3%	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)))))))))
63.3%	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))))))))
63.3%	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)))))`
63.3%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
63.3%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
63.3%	1	`(-.f64 lambda1 lambda2)`
63.3%	1	`lambda2`
63.3%	1	`R`
63.3%	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))))))))))

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes355.0ms (1.1%)

Memory

17.8MiB live, 253.1MiB allocated

Counts

72 → 2

Calls

Call 1

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

Calls

12 calls:

53.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))))))))
48.0ms	(-.f64 lambda1 lambda2)
41.0ms	phi2
37.0ms	lambda1
32.0ms	R

Results

Accuracy	Segments	Branch
63.0%	1	`phi2`
63.0%	1	`phi1`
63.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)))))))))
63.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))))))))
63.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)))))`
63.0%	1	`lambda1`
63.0%	1	`lambda2`
63.0%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
63.0%	1	`(-.f64 lambda1 lambda2)`
63.0%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
63.0%	1	`R`
64.7%	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))))))))))

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes320.0ms (1%)

Memory

21.9MiB live, 298.8MiB allocated

Counts

68 → 2

Calls

Call 1

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

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

Calls

12 calls:

44.0ms	phi1
36.0ms	lambda1
34.0ms	(.f64 #s(literal 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)))))))))
32.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
30.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))))))))

Results

Accuracy	Segments	Branch
61.7%	1	`phi2`
61.7%	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.7%	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))))))))
61.7%	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)))))`
61.7%	1	`lambda2`
61.7%	1	`phi1`
61.7%	1	`R`
61.7%	1	`lambda1`
61.7%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.7%	1	`(-.f64 lambda1 lambda2)`
61.7%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
63.4%	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))))))))))

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes337.0ms (1%)

Memory

-3.9MiB live, 319.0MiB allocated

Counts

67 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

12 calls:

58.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))))))))
46.0ms	(-.f64 lambda1 lambda2)
31.0ms	lambda2
26.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
24.0ms	phi1

Results

Accuracy	Segments	Branch
64.5%	3	`phi2`
54.0%	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)))))`
64.7%	3	`phi1`
54.0%	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 (.f64 (.f64 (cos.f64 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)))))))))
54.0%	2	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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%	3	`lambda2`
55.1%	3	`R`
57.2%	3	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
57.2%	3	`(-.f64 lambda1 lambda2)`
53.6%	2	`lambda1`
57.3%	3	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
55.2%	3	(.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 236 to 142 computations (39.8% saved)

regimes78.0ms (0.2%)

Memory

-28.8MiB live, 52.1MiB allocated

Counts

42 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

38.0ms	lambda2
24.0ms	phi1
11.0ms	phi2

Results

Accuracy	Segments	Branch
51.4%	1	`lambda2`
60.1%	3	`phi2`
51.4%	1	`phi1`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes15.0ms (0%)

Memory

27.7MiB live, 27.7MiB allocated

Counts

41 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

11.0ms

phi2

Results

Accuracy	Segments	Branch
60.1%	3	`phi2`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes18.0ms (0.1%)

Memory

-3.9MiB live, 32.6MiB allocated

Counts

40 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

10.0ms

phi2

Results

Accuracy	Segments	Branch
60.1%	3	`phi2`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes18.0ms (0.1%)

Memory

-2.5MiB live, 33.9MiB allocated

Counts

39 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

13.0ms

phi2

Results

Accuracy	Segments	Branch
59.8%	3	`phi2`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes167.0ms (0.5%)

Memory

-9.8MiB live, 229.0MiB allocated

Counts

36 → 1

Calls

Call 1

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

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

Calls

12 calls:

40.0ms	(.f64 #s(literal 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)))))))))
15.0ms	R
13.0ms	(-.f64 lambda1 lambda2)
13.0ms	lambda2
12.0ms	phi2

Results

Accuracy	Segments	Branch
49.8%	1	`lambda2`
49.8%	1	`phi1`
49.8%	1	`R`
49.8%	1	`lambda1`
49.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 #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))))))))))
49.8%	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)))))))))
49.8%	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))))))))
49.8%	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)))))`
49.8%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
49.8%	1	`(-.f64 lambda1 lambda2)`
49.8%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
49.8%	1	`phi2`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes122.0ms (0.4%)

Memory

-3.7MiB live, 234.5MiB allocated

Counts

32 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

14.0ms	lambda1
11.0ms	(.f64 #s(literal 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)))))))))
11.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)))))
10.0ms	phi1
9.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
49.4%	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))))))))))
49.4%	1	`R`
49.4%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
49.4%	1	`(-.f64 lambda1 lambda2)`
49.4%	1	`lambda1`
49.4%	1	`lambda2`
49.4%	1	`phi1`
49.4%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
49.4%	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)))))))))
49.4%	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))))))))
49.4%	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)))))`
49.4%	1	`phi2`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes134.0ms (0.4%)

Memory

33.0MiB live, 227.7MiB allocated

Counts

29 → 2

Calls

Call 1

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

Outputs

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

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

Calls

12 calls:

36.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))))))))))
11.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)))))
9.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))))))))
9.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
8.0ms	(.f64 #s(literal 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)))))))))

Results

Accuracy	Segments	Branch
49.1%	1	`R`
49.1%	1	`phi1`
49.1%	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))))))))))
49.1%	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)))))))))
49.1%	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))))))))
49.1%	1	`lambda1`
49.1%	1	`lambda2`
49.1%	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)))))`
50.7%	2	`phi2`
49.1%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
49.1%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
49.1%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes367.0ms (1.1%)

Memory

-243.6MiB live, 161.0MiB allocated

Counts

22 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

12 calls:

269.0ms	R
27.0ms	phi2
9.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
8.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)))))
7.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))))))))))

Results

Accuracy	Segments	Branch
51.0%	3	`phi1`
46.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))))))))))
46.0%	1	`R`
49.3%	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 (.f64 (.f64 (cos.f64 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)))))))))
49.3%	2	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 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))))))))
49.3%	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)))))`
46.0%	1	`lambda1`
46.0%	1	`lambda2`
46.0%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
46.0%	1	`(-.f64 lambda1 lambda2)`
46.0%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
47.6%	2	`phi2`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes92.0ms (0.3%)

Memory

-24.6MiB live, 177.5MiB allocated

Counts

21 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

11.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
9.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))))))))
9.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
9.0ms	lambda1
8.0ms	phi1

Results

Accuracy	Segments	Branch
35.7%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
35.7%	1	`(-.f64 lambda1 lambda2)`
35.7%	1	`R`
35.7%	1	`lambda1`
35.7%	1	`lambda2`
35.7%	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))))))))))
35.7%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
35.7%	1	`phi2`
35.7%	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)))))))))
35.7%	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))))))))
35.7%	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)))))`
35.7%	1	`phi1`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes43.0ms (0.1%)

Memory

3.6MiB live, 79.8MiB allocated

Counts

8 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

6.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))))))))))
6.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
3.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))))))))
3.0ms	(.f64 #s(literal 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)))))))))
3.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
35.3%	1	`phi2`
35.3%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
35.3%	1	`(-.f64 lambda1 lambda2)`
35.3%	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)))))))))
35.3%	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))))))))
35.3%	1	`R`
35.3%	1	`lambda1`
35.3%	1	`phi1`
35.3%	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))))))))))
35.3%	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)))))`
35.3%	1	`lambda2`
35.3%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes34.0ms (0.1%)

Memory

31.3MiB live, 70.0MiB allocated

Counts

6 → 1

Calls

Call 1

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

Outputs

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

Calls

12 calls:

5.0ms	(-.f64 lambda1 lambda2)
3.0ms	(.f64 #s(literal 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)))))))))
3.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))))))))
3.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))))))))))
3.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
35.3%	1	`R`
35.3%	1	`phi1`
35.3%	1	`lambda1`
35.3%	1	`phi2`
35.3%	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))))))))))
35.3%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
35.3%	1	`(-.f64 lambda1 lambda2)`
35.3%	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)))))`
35.3%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
35.3%	1	`lambda2`
35.3%	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)))))))))
35.3%	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))))))))

Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes20.0ms (0.1%)

Memory

-39.8MiB live, 43.2MiB allocated

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

12 calls:

4.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
2.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))))))))))
2.0ms	phi2
2.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))))))))
2.0ms	(.f64 #s(literal 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)))))))))

Results

Accuracy	Segments	Branch
32.2%	1	`phi2`
32.2%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
32.2%	1	`(-.f64 lambda1 lambda2)`
32.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))))))))))
32.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)))))))))
32.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))))))))
32.2%	1	`R`
32.2%	1	`lambda1`
32.2%	1	`lambda2`
32.2%	1	`phi1`
32.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)))))`
32.2%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`

Compiler

Compiled 236 to 142 computations (39.8% saved)

bsearch5.0ms (0%)

Memory

10.5MiB live, 10.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.07106950212533372	0.08191209131209386

Compiler

Compiled 68 to 35 computations (48.5% saved)

bsearch2.0ms (0%)

Memory

3.3MiB live, 3.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.8412917787458425e+288	4.033658168775001e+288

Compiler

Compiled 68 to 34 computations (50% saved)

bsearch1.0ms (0%)

Memory

3.1MiB live, 3.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.8412917787458425e+288	4.033658168775001e+288

Compiler

Compiled 68 to 34 computations (50% saved)

bsearch257.0ms (0.8%)

Memory

-0.0MiB live, 226.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
143.0ms	3.5722034605881384e-25	3.9285566744569103e-14
85.0ms	-0.00041689593164982	-4.145440750860904e-8

Samples

203.0ms	244×	1	valid
8.0ms	44×	0	valid

Compiler

Compiled 5 000 to 2 482 computations (50.4% saved)

Precisions

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

adjust: 48.0ms (24.5% of total)

ival-sin: 47.0ms (24% of total)

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

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

ival-sub: 13.0ms (6.6% of total)

ival-pow2: 10.0ms (5.1% of total)

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

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

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

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

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

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

exact: 0.0ms (0% of total)

bsearch220.0ms (0.7%)

Memory

2.8MiB live, 213.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
90.0ms	9.648567452501833e-22	3.087388435906757e-20
120.0ms	-6.646190095502994e+33	-3.1703231540696417e+30

Samples

161.0ms	213×	1	valid
5.0ms	27×	0	valid

Compiler

Compiled 4 208 to 2 209 computations (47.5% saved)

Precisions

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

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

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

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

adjust: 12.0ms (7.9% of total)

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

ival-sqrt: 6.0ms (4% of total)

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

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

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

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

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

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

exact: 0.0ms (0% of total)

bsearch6.0ms (0%)

Memory

5.9MiB live, 5.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	9.648567452501833e-22	3.087388435906757e-20
3.0ms	-6.646190095502994e+33	-3.1703231540696417e+30

Compiler

Compiled 2 858 to 1 639 computations (42.7% saved)

bsearch6.0ms (0%)

Memory

15.0MiB live, 15.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	9.648567452501833e-22	3.087388435906757e-20
3.0ms	-6.646190095502994e+33	-3.1703231540696417e+30

Compiler

Compiled 2 858 to 1 684 computations (41.1% saved)

bsearch154.0ms (0.5%)

Memory

-1.5MiB live, 193.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	9.648567452501833e-22	3.087388435906757e-20
126.0ms	-3.2339495814705236e-7	-6.614633136735618e-28

Samples

104.0ms	150×	1	valid
5.0ms	26×	0	valid

Compiler

Compiled 3 920 to 1 996 computations (49.1% saved)

Precisions

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

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

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

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

adjust: 7.0ms (7% of total)

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

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory

5.0MiB live, 5.0MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	9.648567452501833e-22	3.087388435906757e-20

Compiler

Compiled 1 629 to 811 computations (50.2% saved)

bsearch376.0ms (1.1%)

Memory

-22.1MiB live, 426.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
225.0ms	3.9285566744569103e-14	12408520128.138134
137.0ms	-2.787650307547299e-37	-1.4871284226566763e-51

Samples

332.0ms	282×	1	valid
9.0ms	54×	0	valid

Compiler

Compiled 4 688 to 2 239 computations (52.2% saved)

Precisions

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

ival-sin: 156.0ms (49.1% of total)

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

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

ival-atan2: 16.0ms (5% of total)

adjust: 15.0ms (4.7% of total)

ival-pow2: 13.0ms (4.1% of total)

ival-sqrt: 11.0ms (3.5% of total)

ival-div: 11.0ms (3.5% of total)

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

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

exact: 1.0ms (0.3% of total)

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

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

simplify87.0ms (0.3%)

Memory

14.6MiB live, 90.7MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	328	3694
1	481	3686
2	743	3680
3	1379	3680
4	3087	3680
5	7493	3680

Stop Event

1×	node limit

Calls

Call 1

Inputs
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(if (<=.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)) (sin.f64 (/.f64 (-.f64 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)))))))) #s(literal 5764607523034235/72057594037927936 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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) #s(approx ( 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
#s(approx (* 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 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(if (<=.f64 (.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)))))))))) #s(literal 2000000000000000015260947079150071321029556671023421501560173328879939021272989909222263098271678373027966911110790441791375721089619169999659450521189746542174799252973212292885101977680033834789252899072790417240534025556155575446791828129214239924138966649147955715664277650565909970944 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 #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 (.f64 (.f64 (cos.f64 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 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 (.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)))))))))) #s(literal 2000000000000000015260947079150071321029556671023421501560173328879939021272989909222263098271678373027966911110790441791375721089619169999659450521189746542174799252973212292885101977680033834789252899072790417240534025556155575446791828129214239924138966649147955715664277650565909970944 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 phi1 #s(literal -1770887431076117/73786976294838206464 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 3089898338056309/79228162514264337593543950336 binary64)) #s(approx ( 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1))))))))))
(if (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) #s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -5289050460814003/18889465931478580854784 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 phi1 #s(literal -4097692012860425/1606938044258990275541962092341162602522202993782792835301376 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 4835703278458517/4835703278458516698824704 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))

Outputs
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(if (<=.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)) (sin.f64 (/.f64 (-.f64 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)))))))) #s(literal 5764607523034235/72057594037927936 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 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) #s(approx ( 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
#s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
#s(approx (* 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 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(if (<=.f64 (.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)))))))))) #s(literal 2000000000000000015260947079150071321029556671023421501560173328879939021272989909222263098271678373027966911110790441791375721089619169999659450521189746542174799252973212292885101977680033834789252899072790417240534025556155575446791828129214239924138966649147955715664277650565909970944 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 #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 (.f64 (.f64 (cos.f64 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 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 (.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)))))))))) #s(literal 2000000000000000015260947079150071321029556671023421501560173328879939021272989909222263098271678373027966911110790441791375721089619169999659450521189746542174799252973212292885101977680033834789252899072790417240534025556155575446791828129214239924138966649147955715664277650565909970944 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 phi1 #s(literal -1770887431076117/73786976294838206464 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 3089898338056309/79228162514264337593543950336 binary64)) #s(approx ( 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1))))))))))
(if (or (<=.f64 phi1 #s(literal -1770887431076117/73786976294838206464 binary64)) (not (<=.f64 phi1 #s(literal 3089898338056309/79228162514264337593543950336 binary64)))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) #s(approx ( 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(if (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) #s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (or (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (not (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) #s(approx (* 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 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ ( (* (cos phi2) (cos phi1)) (pow (sin (* (- lambda1 lambda2) 1/2)) 2)) (pow (+ (* (sin (* -1/2 phi2)) (cos (* -1/2 phi1))) (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
(if (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (or (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (not (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64))))
(if (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (or (<=.f64 phi2 #s(literal -3199999999999999725860827430912 binary64)) (not (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(if (<=.f64 phi2 #s(literal -5289050460814003/18889465931478580854784 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(if (or (<=.f64 phi2 #s(literal -5289050460814003/18889465931478580854784 binary64)) (not (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (pow (pow (sin (* 1/2 (- lambda1 lambda2))) 2) 1/2)) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))))
(.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (.f64 (.f64 (.f64 (cos.f64 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(if (<=.f64 phi2 #s(literal 4984604984193435/166153499473114484112975882535043072 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.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 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 phi1 #s(literal -4097692012860425/1606938044258990275541962092341162602522202993782792835301376 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 4835703278458517/4835703278458516698824704 binary64)) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (or (<=.f64 phi1 #s(literal -4097692012860425/1606938044258990275541962092341162602522202993782792835301376 binary64)) (not (<=.f64 phi1 #s(literal 4835703278458517/4835703278458516698824704 binary64)))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) ( (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (pow.f64 (cos.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) #s(approx (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda1 lambda2) 1/2)) 2) (cos phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))

soundness2.0s (6.1%)

Memory

10.3MiB live, 1 274.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	863	8883
1	2790	8625
0	8874	8201
0	101	1087
0	180	953
1	506	905
2	3421	881
0	8467	867
0	26	153
0	45	153
1	149	133
2	1002	129
0	8876	127
0	396	2840
1	1262	2817
2	4113	2708
0	8070	2559
0	134	1330
0	228	1193
1	767	1171
2	5160	1171
0	8265	1164
0	566	6721
1	1844	6685
2	5322	6503
0	8074	6142
0	142	1908
0	239	1796
1	800	1577
2	5144	1541
0	8157	1540
0	849	10603
1	2774	10365
0	8892	9828

Stop Event

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

Compiler

Compiled 9 940 to 3 230 computations (67.5% saved)

preprocess263.0ms (0.8%)

Memory: 9.0MiB live, 249.5MiB allocated
Remove: (negabs R)
Compiler: Compiled 7 858 to 874 computations (88.9% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze1.2s (3.6%)

sample8.9s (27.1%)

explain826.0ms (2.5%)

preprocess339.0ms (1%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify295.0ms (0.9%)

localize366.0ms (1.1%)

series64.0ms (0.2%)

simplify189.0ms (0.6%)

rewrite201.0ms (0.6%)

eval179.0ms (0.5%)

prune259.0ms (0.8%)

simplify216.0ms (0.7%)

localize853.0ms (2.6%)

series213.0ms (0.6%)

simplify227.0ms (0.7%)

rewrite289.0ms (0.9%)

eval759.0ms (2.3%)

prune530.0ms (1.6%)

simplify173.0ms (0.5%)

localize1.2s (3.8%)

series171.0ms (0.5%)

simplify202.0ms (0.6%)

rewrite243.0ms (0.7%)

eval230.0ms (0.7%)

prune466.0ms (1.4%)

simplify225.0ms (0.7%)

localize1.2s (3.6%)

series188.0ms (0.6%)

simplify223.0ms (0.7%)

rewrite238.0ms (0.7%)

eval279.0ms (0.8%)

prune960.0ms (2.9%)

regimes1.3s (4%)

regimes1.1s (3.4%)

regimes1.3s (4%)

regimes1.2s (3.6%)

regimes546.0ms (1.7%)

regimes355.0ms (1.1%)

regimes320.0ms (1%)

regimes337.0ms (1%)

regimes78.0ms (0.2%)

regimes15.0ms (0%)

regimes18.0ms (0.1%)

regimes18.0ms (0.1%)

regimes167.0ms (0.5%)

regimes122.0ms (0.4%)

regimes134.0ms (0.4%)

regimes367.0ms (1.1%)

regimes92.0ms (0.3%)

regimes43.0ms (0.1%)

regimes34.0ms (0.1%)

regimes20.0ms (0.1%)

bsearch5.0ms (0%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch257.0ms (0.8%)

bsearch220.0ms (0.7%)

bsearch6.0ms (0%)

bsearch6.0ms (0%)

bsearch154.0ms (0.5%)

bsearch3.0ms (0%)

bsearch376.0ms (1.1%)

simplify87.0ms (0.3%)

soundness2.0s (6.1%)

preprocess263.0ms (0.8%)

end0.0ms (0%)

Profiling