Distance on a great circle

Time bar (total: 31.4s)

start0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated

analyze2.4s (7.8%)

Memory
-75.9MiB live, 1 068.2MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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)

sample9.7s (30.8%)

Memory
95.2MiB live, 7 570.8MiB allocated
Samples
8.6s7 669×1valid
159.0ms587×0valid
Precisions
Click to see histograms. Total time spent on operations: 8.1s
ival-cos: 2.8s (34.7% of total)
ival-sin: 2.4s (29.6% of total)
adjust: 870.0ms (10.7% of total)
ival-mult: 696.0ms (8.6% of total)
ival-sub: 307.0ms (3.8% of total)
ival-div: 279.0ms (3.4% of total)
ival-sqrt: 223.0ms (2.7% of total)
ival-atan2: 218.0ms (2.7% of total)
ival-pow2: 192.0ms (2.4% of total)
ival-add: 96.0ms (1.2% of total)
exact: 11.0ms (0.1% of total)
ival-true: 6.0ms (0.1% of total)
ival-assert: 3.0ms (0% of total)
Bogosity

explain992.0ms (3.2%)

Memory
21.2MiB live, 577.5MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
74120(6.403270037632028e-92 -7.667235877313953e-270 6.072184438203624e+103 4.3222449760322016e-226 8.314254287451635e-192)0-(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
67129(-1.952585568547572e+169 2.5815931233135235e+43 4.021834494362674e+63 8.325296898252387e-101 -3.4743205486369423e+239)0-(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
91(8.389685727770067e+245 -1.128561424546071e-253 -7.23329662408819e-58 -7.189582857043541e-31 -1.877696580271083e+54)2(3.8132346305363002e+233 2.2568571609221437e-126 6.533889044433502e-264 9.655821215500445e-242 -7.56181667699238e+191)(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
30-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))))))
00-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))))
00-0-lambda2
00-0-#s(literal 1 binary64)
00-0-phi2
00-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))))))))
00-0-(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
00-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)))))))))
00-0-(*.f64 (cos.f64 phi1) (cos.f64 phi2))
00-0-(-.f64 lambda1 lambda2)
00-0-R
00-0-(cos.f64 phi2)
00-0-lambda1
00-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)))))
00-0-phi1
00-0-(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
00-0-(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
00-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)))))))
00-0-#s(literal 2 binary64)
00-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))))))))))
00-0-(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
00-0-(-.f64 phi1 phi2)
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sin.f64(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))sensitivity1961
sin.f64(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))sensitivity1940
-.f64(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))cancellation86
sqrt.f64(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))uflow-rescue30
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))underflow14
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))underflow15
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))underflow3
Confusion
Predicted +Predicted -
+1280
-11513
Precision
0.5267489711934157
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+12800
-115112
Precision?
0.5245901639344263
Recall?
1.0
Freqs
test
numberfreq
013
188
2152
33
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
581.0ms470×1valid
8.0ms42×0valid
Compiler

Compiled 849 to 82 computations (90.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 524.0ms
ival-cos: 157.0ms (29.9% of total)
ival-sin: 148.0ms (28.2% of total)
ival-mult: 71.0ms (13.5% of total)
adjust: 53.0ms (10.1% of total)
ival-atan2: 38.0ms (7.2% of total)
ival-sub: 15.0ms (2.9% of total)
ival-sqrt: 13.0ms (2.5% of total)
ival-div: 13.0ms (2.5% of total)
ival-pow2: 11.0ms (2.1% of total)
ival-add: 4.0ms (0.8% of total)
exact: 1.0ms (0.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess202.0ms (0.6%)

Memory
26.1MiB live, 114.9MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02331311
15601304
213991304
340531304
464731304
02665
04565
18365
215365
338765
494765
5180365
6360865
7787765
0808763
Stop Event
iter limit
node limit
iter limit
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 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
Symmetry

(negabs R)

Compiler

Compiled 65 to 26 computations (60% saved)

eval0.0ms (0%)

Memory
0.2MiB live, 0.2MiB allocated
Compiler

Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
59.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 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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)

simplify135.0ms (0.4%)

Memory
-25.8MiB live, 72.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

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

IterNodesCost
026390
045390
183390
2153390
3387390
4947390
51803390
63608390
77877390
08087380
Stop Event
iter limit
node limit
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 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.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)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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))
(*.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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(literal 1 binary64)

localize334.0ms (1.1%)

Memory
30.6MiB live, 311.0MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.7212534046008654
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
accuracy0.8031093223143195
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
accuracy14.157128129684473
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Samples
309.0ms235×1valid
4.0ms21×0valid
Compiler

Compiled 392 to 28 computations (92.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 288.0ms
ival-cos: 93.0ms (32.3% of total)
ival-sin: 56.0ms (19.4% of total)
ival-mult: 47.0ms (16.3% of total)
ival-sqrt: 44.0ms (15.3% of total)
adjust: 19.0ms (6.6% of total)
ival-sub: 8.0ms (2.8% of total)
ival-atan2: 7.0ms (2.4% of total)
ival-div: 6.0ms (2.1% of total)
ival-pow2: 5.0ms (1.7% of total)
ival-add: 2.0ms (0.7% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series96.0ms (0.3%)

Memory
1.8MiB live, 96.5MiB allocated
Counts
8 → 100
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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64)))
(sin.f64 (/.f64 (-.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))))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (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)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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)))))
(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)))))))))
(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 (+ (* (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)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* 1/2 (- lambda1 lambda2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (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)))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (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)))))))))
(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 (+ (* (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)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -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)))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (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)))))))))
(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 (+ (* (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)))
(sin (* 1/2 (- phi1 phi2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (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)))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sqrt (+ (* (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)))
(+ (* (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)))))))))
(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)))))))))))
(- 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)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (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)))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sqrt (+ (* (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)))
Calls

15 calls:

TimeVariablePointExpression
25.0ms
phi1
@0
((+ (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)))))))) (atan2 (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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))))))
11.0ms
R
@inf
((+ (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)))))))) (atan2 (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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))))))
8.0ms
lambda2
@-inf
((+ (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)))))))) (atan2 (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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))))))
6.0ms
lambda1
@inf
((+ (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)))))))) (atan2 (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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))))))
6.0ms
lambda1
@0
((+ (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)))))))) (atan2 (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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))))))

simplify216.0ms (0.7%)

Memory
-1.0MiB live, 181.6MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04915291
117315020
273925017
082794787
Stop Event
iter limit
node limit
Counts
100 → 100
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)))))))
(+ (* (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)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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)))))
(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)))))))))
(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 (+ (* (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)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* 1/2 (- lambda1 lambda2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (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)))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (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)))))))))
(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 (+ (* (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)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -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)))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (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)))))))))
(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 (+ (* (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)))
(sin (* 1/2 (- phi1 phi2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (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)))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sqrt (+ (* (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)))
(+ (* (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)))))))))
(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)))))))))))
(- 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)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (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)))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sqrt (+ (* (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)))
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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))
(+ (* (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 phi2 phi1) #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 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) 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 phi2 phi1) #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 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (cos.f64 phi2)) (*.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)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1)) 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 phi2 phi1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))
(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)))
(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 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 phi2 phi1) #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 (cos.f64 phi1) lambda1)) (*.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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 phi2 phi1) #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) lambda1) (*.f64 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.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))))) (sqrt.f64 (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 phi2 phi1) #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) lambda1) (*.f64 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (/.f64 (cos.f64 phi2) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.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))) #s(literal -1/6 binary64))) lambda1))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) lambda1 (sqrt.f64 (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 phi2 phi1) #s(literal -1/2 binary64))) #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 phi2 phi1) #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)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (fma.f64 (*.f64 (neg.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.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 phi2 phi1) #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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.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 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.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 phi2 phi1) #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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(- 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 lambda2 lambda1) #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))))
(+ (* (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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(- 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 lambda2 lambda1) #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))))
(+ (* (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 phi2 phi1) #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 phi2 phi1) #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)) (*.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 phi1) lambda2) (cos.f64 phi2)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) 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 phi2 phi1) #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 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda2) (cos.f64 phi2)) (*.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)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) 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 phi2 phi1) #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 #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)))
(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 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 phi2 phi1) #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 (cos.f64 phi1) lambda2)) (*.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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (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 phi2 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.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 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 phi2 phi1) #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) lambda2) (*.f64 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (/.f64 (cos.f64 phi2) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.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))) #s(literal 1/6 binary64))) lambda2))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) lambda2 (sqrt.f64 (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 phi2 phi1) #s(literal -1/2 binary64))) #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 phi2 phi1) #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 phi2 phi1) #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 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) 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 phi2 phi1) #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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.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 (*.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 phi2 phi1) #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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(- 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 lambda2 lambda1) #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))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (* (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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) 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 lambda2 lambda1) #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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 lambda2 lambda1) #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 (*.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)))
(+ (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 (*.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)))
(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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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) phi1) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (fma.f64 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) phi1) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (fma.f64 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) phi1))) (*.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 lambda2 lambda1) #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 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (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 lambda2 lambda1) #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 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1/6 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(- 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 lambda2 lambda1) #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))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.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 lambda2 lambda1) #s(literal -1/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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (fma.f64 (*.f64 #s(literal 1/6 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/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2 (*.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 lambda2 lambda1) #s(literal -1/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 (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)) #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64))) 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)))
(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 lambda2 lambda1) #s(literal -1/2 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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #s(literal -1/2 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 lambda2 lambda1) #s(literal -1/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) (fma.f64 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) (*.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 lambda2 lambda1) #s(literal -1/2 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) phi2) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (fma.f64 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) phi2))) (*.f64 (*.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 lambda2 lambda1) #s(literal -1/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 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (+ (* (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 lambda2 lambda1) #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 lambda2 lambda1) #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) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) (*.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 lambda2 lambda1) #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 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) #s(literal 1/6 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(+ (* (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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(- 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 lambda2 lambda1) #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))))

rewrite175.0ms (0.6%)

Memory
11.0MiB live, 199.7MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
026288
045288
1152243
21049235
08130230
Stop Event
iter limit
node limit
iter limit
Counts
8 → 161
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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64)))
(sin.f64 (/.f64 (-.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))))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))) (*.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))))) (pow.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.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 (neg.f64 (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 (pow.f64 (sin.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(*.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(+.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64))) (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))) (/.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(neg.f64 (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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fabs.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(fabs.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sinh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (neg.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (sqrt.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (*.f64 (neg.f64 (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))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (neg.f64 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (*.f64 (neg.f64 (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))))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (fabs.f64 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (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))) (*.f64 (neg.f64 (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))))
(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 (-.f64 lambda1 lambda2) #s(literal 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))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (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 2 binary64)))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))

eval90.0ms (0.3%)

Memory
3.8MiB live, 141.2MiB allocated
Compiler

Compiled 35 534 to 2 405 computations (93.2% saved)

prune149.0ms (0.5%)

Memory
11.3MiB live, 239.5MiB allocated
Pruning

60 alts after pruning (60 fresh and 0 done)

PrunedKeptTotal
New31460374
Fresh000
Picked101
Done000
Total31560375
Accuracy
62.6%
Counts
375 → 60
Alt Table
Click to see full alt table
StatusAccuracyProgram
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
38.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
55.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #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))))))))))
59.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
59.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 (-.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
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 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
59.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 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
59.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))))
59.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
59.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 (/.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
59.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
59.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
59.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
58.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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
59.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 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))
60.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) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (/.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.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 phi1 phi2) #s(literal 2 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))))))))))
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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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))))))))))
36.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 #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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))))))))))
45.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 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
46.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 #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))))))))))
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)))) (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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
46.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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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.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) #s(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 phi2 phi1) #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)))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
38.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
39.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 #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
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 #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) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
46.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
38.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)))) #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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)))) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
45.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.0%
(*.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) phi1)) (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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) 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))))))))))
40.7%
(*.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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.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 lambda2 lambda1) #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))))))))))
43.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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))))))))))
42.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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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))))))))))
40.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))))
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 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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))))))))))
43.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 phi2 phi1) #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))))))))))
46.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 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 phi2 phi1) #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))))))))))
40.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 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 phi2 phi1) #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))))))))))
59.8%
(*.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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
Compiler

Compiled 10 400 to 5 058 computations (51.4% saved)

simplify141.0ms (0.5%)

Memory
-16.1MiB live, 122.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

IterNodesCost
01062971
01912971
13112965
26442959
318122929
449132929
080512851
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))
(sin.f64 (/.f64 phi1 #s(literal 2 binary64)))
(/.f64 phi1 #s(literal 2 binary64))
phi1
(cos.f64 (/.f64 phi2 #s(literal 2 binary64)))
(/.f64 phi2 #s(literal 2 binary64))
phi2
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))
(cos.f64 (/.f64 phi1 #s(literal 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 (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)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(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))))))
(+.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)))))
(pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))
#s(approx (sin (/ (- phi1 phi2) 2)) (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)
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)
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)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
#s(literal 1/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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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))))))))
(sqrt.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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) lambda1)
(cos.f64 phi1)
phi1
lambda1
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(*.f64 #s(literal 1/2 binary64) lambda2)
#s(literal 1/2 binary64)
lambda2
(cos.f64 phi2)
phi2
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(*.f64 #s(literal -1/2 binary64) lambda2)
#s(literal -1/2 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 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 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.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)) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.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)) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.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)) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))
(sin.f64 (/.f64 phi1 #s(literal 2 binary64)))
(/.f64 phi1 #s(literal 2 binary64))
phi1
(cos.f64 (/.f64 phi2 #s(literal 2 binary64)))
(cos.f64 (/.f64 phi2 #s(literal -2 binary64)))
(/.f64 phi2 #s(literal 2 binary64))
phi2
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))
(cos.f64 (/.f64 phi1 #s(literal 2 binary64)))
(cos.f64 (/.f64 phi1 #s(literal -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 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))
(*.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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 (-.f64 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.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)) (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 (-.f64 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(atan2.f64 (sqrt.f64 (fma.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)) (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 (-.f64 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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))
(*.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))
(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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 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 (/.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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.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)) #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 #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 (/.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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.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)) #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 #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 (/.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 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.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)) #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 #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 (fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 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)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (cos.f64 phi2) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))
#s(approx (sin (/ (- phi1 phi2) 2)) (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)
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))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (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 lambda2 lambda1) #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 #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.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)) (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 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (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 lambda2 lambda1) #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 #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(atan2.f64 (sqrt.f64 (fma.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)) (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 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (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 lambda2 lambda1) #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 (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)) (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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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))
(*.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))))) (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 lambda2 lambda1) #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 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (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 lambda2 lambda1) #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (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 lambda2 lambda1) #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
#s(literal 1/2 binary64)
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal -1/2 binary64) phi1)
#s(literal -1/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 lambda2 lambda1) #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 lambda2 lambda1) #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))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (fma.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)) #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 #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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (atan2.f64 (sqrt.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (fma.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)) #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 #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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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))))))))
(atan2.f64 (sqrt.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (fma.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)) #s(literal 1 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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) lambda1)
(*.f64 lambda1 (cos.f64 phi1))
(cos.f64 phi1)
phi1
lambda1
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))
(cos.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)
lambda2
(cos.f64 phi2)
phi2
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(*.f64 #s(literal -1/2 binary64) lambda2)
#s(literal -1/2 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 phi2 phi1) #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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 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)))))))
(sqrt.f64 (-.f64 (fma.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)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) #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 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (cos.f64 phi2)) (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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)

localize951.0ms (3%)

Memory
8.9MiB live, 806.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy14.157128129684473
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy14.157128129684473
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
accuracy16.362404644360623
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy31.778917344939433
#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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
accuracy14.157128129684473
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
accuracy28.809446617149465
#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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))
accuracy0.8031093223143195
(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))))))
accuracy14.157128129684473
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy39.396220854035356
#s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
accuracy14.157128129684473
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
accuracy25.320697286863968
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
accuracy0.7212534046008654
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
accuracy0.8031093223143195
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
accuracy14.157128129684473
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy16.362404644360623
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Samples
758.0ms234×1valid
22.0ms3valid
14.0ms21×0valid
Compiler

Compiled 2 507 to 78 computations (96.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 690.0ms
ival-sin: 216.0ms (31.3% of total)
ival-cos: 216.0ms (31.3% of total)
adjust: 89.0ms (12.9% of total)
ival-mult: 71.0ms (10.3% of total)
ival-pow2: 28.0ms (4.1% of total)
ival-add: 22.0ms (3.2% of total)
ival-sub: 15.0ms (2.2% of total)
ival-atan2: 12.0ms (1.7% of total)
ival-sqrt: 10.0ms (1.4% of total)
ival-div: 10.0ms (1.4% of total)
exact: 1.0ms (0.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series193.0ms (0.6%)

Memory
29.3MiB live, 180.5MiB allocated
Counts
27 → 182
Calls
Call 1
Inputs
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(+.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 #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.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 (/.f64 (-.f64 lambda1 lambda2) #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))))))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
#s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(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))))))
#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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))
#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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
Outputs
(* 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)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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)))
(+ (* (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)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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)))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 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)))))))))
(sqrt (+ (* (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)))
(+ (sqrt (+ (* (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))) (* 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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))
(+ (sqrt (+ (* (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 (+ (* 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 (- (* (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)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))))
(+ (sqrt (+ (* (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 (+ (* 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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 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)))))) (sqrt (/ 1 (+ (* (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)))))))))))
(- 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)))
(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 (- lambda1 lambda2))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(sin (* 1/2 (- lambda1 lambda2)))
(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)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sin (* -1/2 (- lambda2 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 (+ lambda2 (* -1 lambda1)))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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 (- (* (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 (* 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)))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(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)))
(- 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 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)))
(+ (* (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)))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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))))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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))))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 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)))))))))
(sqrt (+ (* (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)))
(+ (sqrt (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))
(+ (sqrt (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (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)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))))
(+ (sqrt (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 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)))))) (sqrt (/ 1 (+ (* (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 (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)))
(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 (* -1 lambda2)))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -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 (* 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)))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(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)))
(- 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 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)))
(* -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))
(+ (* 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 (- lambda2 lambda1))) 2))
(- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(- (+ 1 (* phi1 (+ (* -1 (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2))))) (* 1/2 phi2)))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(- (+ 1 (* phi1 (+ (* 1/2 phi2) (* phi1 (- (* -1/12 (* phi1 phi2)) (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(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)))))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))))
(- 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)))
(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 (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (- phi2 phi1)))
(+ (* (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 (* 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)))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(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)))
(sqrt (+ (* (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)))
(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))))))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))
(+ (* 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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (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)))))))))
(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)))))))))))
(- 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)))
(* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))
(* phi2 (- (+ (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))) (/ (pow (cos (* -1/2 phi1)) 2) phi2)) (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 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 (* 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)))))
(* -1 (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (* -1 (/ (- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))) phi2)))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(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)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
Calls

15 calls:

TimeVariablePointExpression
38.0ms
phi2
@0
((+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (atan2 (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 (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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)))))))) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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 (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)))
24.0ms
lambda2
@-inf
((+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (atan2 (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 (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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)))))))) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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 (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)))
16.0ms
lambda1
@0
((+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (atan2 (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 (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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)))))))) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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 (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)))
15.0ms
lambda1
@inf
((+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (atan2 (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 (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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)))))))) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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 (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)))
14.0ms
phi1
@-inf
((+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (atan2 (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 (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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)))))))) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (/ (- lambda1 lambda2) 2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 2)) (sqrt (+ (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 (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)))

simplify246.0ms (0.8%)

Memory
-29.6MiB live, 200.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
086210386
130169830
082079361
Stop Event
iter limit
node limit
Counts
182 → 182
Calls
Call 1
Inputs
(* 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)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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)))
(+ (* (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)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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)))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 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)))))))))
(sqrt (+ (* (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)))
(+ (sqrt (+ (* (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))) (* 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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))
(+ (sqrt (+ (* (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 (+ (* 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 (- (* (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)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))))
(+ (sqrt (+ (* (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 (+ (* 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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 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)))))) (sqrt (/ 1 (+ (* (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)))))))))))
(- 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)))
(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 (- lambda1 lambda2))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(sin (* 1/2 (- lambda1 lambda2)))
(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)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sin (* -1/2 (- lambda2 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 (+ lambda2 (* -1 lambda1)))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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 (- (* (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 (* 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)))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(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)))
(- 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 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)))
(+ (* (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)))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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))))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (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))))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 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)))))))))
(sqrt (+ (* (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)))
(+ (sqrt (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))
(+ (sqrt (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (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)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))))
(+ (sqrt (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 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)))))) (sqrt (/ 1 (+ (* (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 (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)))
(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 (* -1 lambda2)))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -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 (* 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)))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(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)))
(- 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 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)))
(* -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))
(+ (* 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 (- lambda2 lambda1))) 2))
(- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(- (+ 1 (* phi1 (+ (* -1 (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2))))) (* 1/2 phi2)))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(- (+ 1 (* phi1 (+ (* 1/2 phi2) (* phi1 (- (* -1/12 (* phi1 phi2)) (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(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)))))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))))
(- 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)))
(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 (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (- phi2 phi1)))
(+ (* (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 (* 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)))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(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)))
(sqrt (+ (* (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)))
(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))))))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))
(+ (* 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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (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)))))))))
(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)))))))))))
(- 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)))
(* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))
(* phi2 (- (+ (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))) (/ (pow (cos (* -1/2 phi1)) 2) phi2)) (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 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 (* 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)))))
(* -1 (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (* -1 (/ (- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))) phi2)))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(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)))
(sqrt (+ (* (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 (- (* (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 #s(literal 1/2 binary64) (-.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)))) (sqrt.f64 (-.f64 #s(literal 1 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 (-.f64 phi2 phi1) #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 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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) 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)))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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) 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))))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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) 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))))
(+ (* 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 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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) 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))))
(+ (* (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 phi2 phi1) #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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #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 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #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 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(fma.f64 (neg.f64 (*.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 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ (* 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)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(fma.f64 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.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 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ (* 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)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (neg.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)))) lambda1 (*.f64 (neg.f64 (*.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 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 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 phi2 phi1) #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 (- phi2 phi1))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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 #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)))
(sqrt (+ (* (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)))
(sqrt.f64 (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) 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 (+ (* (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))) (* 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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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) 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 (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) 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 (+ (* (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 (+ (* 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 (- (* (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)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.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) 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 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (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) 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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (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 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) 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 (+ (* (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 (+ (* 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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 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)))))) (sqrt (/ 1 (+ (* (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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.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) 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 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (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) 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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (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) 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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (/.f64 (cos.f64 phi1) (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) 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 (cos.f64 phi2) (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)))) lambda1)))) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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) 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))))))) lambda1 (sqrt.f64 (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) 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)))))
(- 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 phi2 phi1) #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)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (-.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 phi2 phi1) #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 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (-.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 phi2 phi1) #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 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 phi2 phi1) #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 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) #s(literal 1/2 binary64) (sqrt.f64 (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 phi2 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (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 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 phi2 phi1) #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) (*.f64 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (/.f64 (cos.f64 phi1) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (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)))) lambda1)))) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) lambda1 (sqrt.f64 (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 phi2 phi1) #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 #s(literal 1/2 binary64) (-.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)))
(+ (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.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))))))
(*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(*.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 phi2) lambda1))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) lambda1)) lambda1)
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(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.f64 (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 (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))))
(- 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 (-.f64 phi2 phi1) #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 lambda2 lambda1) #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)))
(+ (* (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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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 lambda2 lambda1) #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)))))))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(*.f64 (neg.f64 lambda1) (neg.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 phi2) lambda1))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(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.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(- 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 lambda2 lambda1) #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))))
(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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
(+ (* (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) 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)))
(+ (* -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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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) 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))))
(+ (* 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 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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) 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))))
(+ (* 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 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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) 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))))
(+ (* (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 phi2 phi1) #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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #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 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 phi2 phi1) #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 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ (* lambda2 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ (* 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)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(fma.f64 (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ (* 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)))) (pow (cos (* -1/2 phi1)) 2))) (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (neg.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)))) lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)))) lambda2)) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (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)))
(sqrt (+ (* (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)))
(sqrt.f64 (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) 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 (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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) 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 (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) 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 (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (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)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.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) 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 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (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) 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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 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) 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 (+ (* (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/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 (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 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)))))) (sqrt (/ 1 (+ (* (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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.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) 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 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (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) 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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (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) 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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (/.f64 (cos.f64 phi1) (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) 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 (cos.f64 phi2) (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)))) lambda2)))) lambda2 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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) 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))))))) lambda2 (sqrt.f64 (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) 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)))))
(- 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 phi2 phi1) #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 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #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 phi2 phi1) #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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (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 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 phi2 phi1) #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 (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (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 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 phi2 phi1) #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)))
(sqrt.f64 (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 phi2 phi1) #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 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) #s(literal -1/2 binary64) (sqrt.f64 (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 phi2 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 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 phi2 phi1) #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) (*.f64 (sqrt.f64 (/.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (/.f64 (cos.f64 phi1) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (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)))) lambda2)))) lambda2 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) lambda2 (sqrt.f64 (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 phi2 phi1) #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 #s(literal 1/2 binary64) (-.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)))
(+ (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (- (* (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 #s(literal 1/2 binary64) (-.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)))) (sqrt.f64 (-.f64 #s(literal 1 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 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(- (+ (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (pow (cos (* -1/2 phi1)) 2)) (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 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)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(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.f64 (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 (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))))
(- 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 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 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (+ (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 (*.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)) phi1))) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(* -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)))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(- (* phi1 (+ (* 1/8 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (cos (* 1/2 phi2))))) (sin (* 1/2 phi2)))
(-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) 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)))
(-.f64 (*.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)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (fma.f64 (*.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)) phi1 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (- lambda2 lambda1))) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* phi1 (+ (* -1 (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2))))) (* 1/2 phi2)))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 (- lambda2 lambda1))) 2)))))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 phi2 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64))) phi1 (*.f64 #s(literal 1/2 binary64) phi2)) phi1 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (fma.f64 (*.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)) phi1 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 (*.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)))
(+ (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 (*.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)))
(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (sqrt.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)) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))))) (* 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)))))))))
(fma.f64 (*.f64 (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1) (*.f64 #s(literal -1/2 binary64) (*.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.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))) phi1)))) phi1 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) phi1 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi2 (PI.f64))) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (neg.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (-.f64 (*.f64 (neg.f64 phi1) (*.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))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (neg.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))
(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.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)) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) (*.f64 (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.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))) phi1)))) phi1 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) phi1 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(- (* (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) 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 (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(sin (* -1/2 (- phi2 phi1)))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.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)))) (sqrt.f64 (-.f64 #s(literal 1 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 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (+ phi2 (* -1 phi1)))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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)))
(- 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (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 (-.f64 phi2 phi1) #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 #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) 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 (neg.f64 phi2) (*.f64 (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 #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) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.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) 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.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) 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/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)))
(- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* 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 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 (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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.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 (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)))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (*.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 (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)))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (*.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 (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 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)))
(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 #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) 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 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.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)) (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 #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) 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 #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) phi1)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (sin.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)) (fma.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) phi1)) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) phi2 (sqrt.f64 (fma.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) 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) (*.f64 (sqrt.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)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (sin.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)) (fma.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) phi1)) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (sin.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)) (fma.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) phi1)) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.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) phi1)) #s(literal 2 binary64))))) (*.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))) phi2)))) phi2 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.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) phi1)) #s(literal 2 binary64))))))) phi2 (sqrt.f64 (fma.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) phi1)) #s(literal 2 binary64)))))
(- 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) (*.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (-.f64 (*.f64 (neg.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1))))
(* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (- (+ (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))) (/ (pow (cos (* -1/2 phi1)) 2) phi2)) (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2)))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) 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 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 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.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)))) (sqrt.f64 (-.f64 #s(literal 1 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 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(* -1 (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (* -1 (/ (- (pow (cos (* -1/2 phi1)) 2) (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))) phi2)))))
(*.f64 (neg.f64 phi2) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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)))
(- 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (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 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))

rewrite251.0ms (0.8%)

Memory
29.7MiB live, 258.1MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01061357
01911305
15331156
234041156
085991123
Stop Event
iter limit
node limit
iter limit
Counts
27 → 406
Calls
Call 1
Inputs
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(+.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 #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.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 (/.f64 (-.f64 lambda1 lambda2) #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #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))))) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))))))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
#s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(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))))))
#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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))
#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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
Outputs
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (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 (pow.f64 (sin.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (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 (pow.f64 (sin.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))) #s(literal 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64)) R)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #s(literal 2 binary64)))
(*.f64 R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(+.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(*.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 2 binary64)) R)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(+.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R))
(+.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(+.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64))))
(fma.f64 (pow.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.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)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (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 2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (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 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(+.f64 (/.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)))))
(+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))
(*.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))) #s(literal 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64)) R)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #s(literal 2 binary64)))
(*.f64 R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(+.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.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 (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))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (*.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)))) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (*.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 (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 (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(/.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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))))
(fma.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) #s(literal 1 binary64)) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(fma.f64 (pow.f64 (fabs.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(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)) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(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)) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(fma.f64 (fabs.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fabs.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(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)))) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))
(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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(-.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(-.f64 (*.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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(-.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 lambda2 lambda1) #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 lambda2 lambda1) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1)))
(+.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(*.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 2 binary64)) R)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(+.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) R))
(+.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))) (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))))
(+.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 4 binary64))) (-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (pow.f64 (fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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 2 binary64)) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1)))) (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (*.f64 lambda1 (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 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)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (PI.f64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi1)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (cos.f64 phi1)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(+.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)))))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))) #s(literal 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64)))
(*.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(fma.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) 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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(fma.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) 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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) R))
(+.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 3 binary64)) (pow.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 3 binary64))) (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) (atan2.f64 (sqrt.f64 #s(approx (+ (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) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
(neg.f64 (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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 #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) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (-.f64 #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) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #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 (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))))
(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 (-.f64 lambda1 lambda2) #s(literal 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))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1/2 binary64)))
(pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 1 binary64))
#s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(exp.f64 (*.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64)))))
(sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 1/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 lambda2 lambda1) #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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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/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 binary64))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))

eval202.0ms (0.6%)

Memory
16.6MiB live, 205.2MiB allocated
Compiler

Compiled 92 005 to 4 537 computations (95.1% saved)

prune351.0ms (1.1%)

Memory
-1.7MiB live, 377.7MiB allocated
Pruning

116 alts after pruning (116 fresh and 0 done)

PrunedKeptTotal
New72388811
Fresh272855
Picked505
Done000
Total755116871
Accuracy
63.5%
Counts
871 → 116
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
40.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #s(literal 2 binary64)))
39.4%
(*.f64 R (/.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
38.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
37.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #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))))))))))
59.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
60.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
34.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
57.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
57.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
60.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
45.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
36.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
36.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
47.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
47.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
41.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
45.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
49.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
47.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
46.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
43.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
59.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 (-.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
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 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
59.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 (/.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
59.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
59.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
58.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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))))))
59.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 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))
60.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) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (/.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.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 phi1 phi2) #s(literal 2 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))))))))))
36.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 #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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))))))))))
45.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 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
46.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 #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))))))))))
44.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) #s(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 phi2 phi1) #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)))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
39.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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1))))))))
39.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 #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 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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))))))))))
39.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (*.f64 (*.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 (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))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
39.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 (+.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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)))))))))
46.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
22.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 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
20.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
24.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (-.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
31.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
39.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
8.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
29.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)))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
43.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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
43.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)))) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
33.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) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
30.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))))) (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 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 lambda2 lambda1) #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 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
41.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.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)))))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
26.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
31.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
39.2%
(*.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.7%
(*.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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
40.7%
(*.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 (-.f64 (*.f64 (-.f64 #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) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))))
40.7%
(*.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
40.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
30.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
32.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
40.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 #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))))))))))
41.0%
(*.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) #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
37.0%
(*.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) #s(approx (+ (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) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
30.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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
32.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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
25.5%
(*.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))))) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
41.0%
(*.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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
26.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
29.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
27.4%
(*.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)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))))))))
43.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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) 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))))))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (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) 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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (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) 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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
29.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))) #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)))))))))))
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 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
38.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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
22.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
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 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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))))))))))
34.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 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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
46.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 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 phi2 phi1) #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))))))))))
36.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
40.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 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 phi2 phi1) #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))))))))))
39.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (PI.f64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (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))))))))))
14.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)))) (-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
24.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
30.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
25.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
6.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.8%
(*.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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
60.7%
#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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))))))))
Compiler

Compiled 23 832 to 11 698 computations (50.9% saved)

simplify148.0ms (0.5%)

Memory
23.0MiB live, 112.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

IterNodesCost
01363151
02352895
14142850
29712826
329482760
470102760
081362682
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))
(sin.f64 (/.f64 phi1 #s(literal 2 binary64)))
(/.f64 phi1 #s(literal 2 binary64))
phi1
(cos.f64 (/.f64 phi2 #s(literal 2 binary64)))
(/.f64 phi2 #s(literal 2 binary64))
phi2
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))
(cos.f64 (/.f64 phi1 #s(literal 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 (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 (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 (-.f64 lambda1 lambda2) #s(literal 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 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))
(-.f64 phi1 phi2)
#s(literal -2 binary64)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))
(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 phi1)
phi2
phi1
#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)))))
(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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))
#s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))
(fma.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) 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
(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))))
(*.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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)
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 lambda1)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #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)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.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 phi2 phi1) #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))))))))
(sqrt.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 phi2 phi1) #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 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(*.f64 lambda2 (neg.f64 (cos.f64 phi1)))
lambda2
(neg.f64 (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))
(*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(cos.f64 phi2)
phi2
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(*.f64 #s(literal 1/2 binary64) lambda1)
#s(literal 1/2 binary64)
lambda1
(cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 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 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))
(sin.f64 (/.f64 phi1 #s(literal 2 binary64)))
(/.f64 phi1 #s(literal 2 binary64))
phi1
(cos.f64 (/.f64 phi2 #s(literal 2 binary64)))
(cos.f64 (/.f64 phi2 #s(literal -2 binary64)))
(/.f64 phi2 #s(literal 2 binary64))
phi2
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))
(cos.f64 (/.f64 phi1 #s(literal 2 binary64)))
(cos.f64 (/.f64 phi1 #s(literal -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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))
(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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))
(-.f64 phi1 phi2)
#s(literal -2 binary64)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2))
(neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 phi1)
phi2
phi1
#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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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)))) (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 lambda2 lambda1) #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 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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)))) (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 lambda2 lambda1) #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 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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)))) (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 lambda2 lambda1) #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 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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)))
(pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))
(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))
#s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))
#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))))
(fma.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)))
(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)))
(*.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 #s(literal 1/2 binary64) phi2))
(*.f64 #s(literal -1/2 binary64) phi2)
#s(literal -1/2 binary64)
phi2
(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))))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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)
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 lambda1)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (sqrt.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)))
(sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 (atan2.f64 (sqrt.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #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 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 phi2 phi1) #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))))))))
(atan2.f64 (sqrt.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 phi2 phi1) #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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 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 phi2 phi1) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(*.f64 lambda2 (neg.f64 (cos.f64 phi1)))
(*.f64 (neg.f64 lambda2) (cos.f64 phi1))
lambda2
(neg.f64 (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(*.f64 #s(literal 1/2 binary64) lambda1)
#s(literal 1/2 binary64)
lambda1
(cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 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)))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)

localize1.2s (3.7%)

Memory
-17.6MiB live, 1 064.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy6.203629685530107
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy6.203629685530107
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy15.436562713728552
#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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
accuracy0.25619125976844204
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
accuracy0.3996503616931893
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
accuracy6.203629685530107
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy6.625003869076437
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
accuracy12.1306503940368
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
accuracy17.186309093338426
#s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))
accuracy6.203629685530107
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy15.481616879699898
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
accuracy20.205433977701283
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
accuracy0.2265625
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
accuracy0.3166239203953413
(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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
accuracy6.305256216713456
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Samples
547.0ms124×1valid
367.0ms87×1invalid
32.0ms37×0invalid
7.0ms0valid
Compiler

Compiled 2 527 to 107 computations (95.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 800.0ms
ival-mult: 221.0ms (27.6% of total)
ival-cos: 187.0ms (23.4% of total)
ival-sin: 186.0ms (23.3% of total)
adjust: 72.0ms (9% of total)
ival-pow2: 43.0ms (5.4% of total)
ival-sqrt: 21.0ms (2.6% of total)
ival-div: 18.0ms (2.3% of total)
ival-add: 17.0ms (2.1% of total)
ival-sub: 15.0ms (1.9% of total)
ival-atan2: 15.0ms (1.9% of total)
ival-neg: 4.0ms (0.5% of total)
exact: 1.0ms (0.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series172.0ms (0.5%)

Memory
-34.2MiB live, 211.4MiB allocated
Counts
26 → 196
Calls
Call 1
Inputs
(*.f64 (*.f64 (*.f64 (cos.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 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 phi2 phi1) #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 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 phi2 phi1) #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))))))))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
#s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(sin.f64 (/.f64 (-.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))))))
#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 phi2 phi1) #s(literal -1/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)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))))) (pow (cos (* -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)))
(+ (* (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)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (+ (* -1/2 (* lambda2 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda1 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (+ (* -1/2 (* lambda2 (* (cos phi1) (cos phi2)))) (* lambda1 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 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)))))))))
(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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (- phi2 phi1))) 2)))
(sin (* 1/2 (- lambda1 lambda2)))
(pow (sin (* 1/2 (- lambda1 lambda2))) 2)
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sin (* -1/2 (- lambda2 lambda1)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))) (pow (cos (* -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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (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))))
(pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) 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)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (+ (* -1 (* 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) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -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)))
(+ (* (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 (sin (* -1/2 (- phi2 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)))))))))
(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))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))
(* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) lambda2) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda2))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))) (pow (cos (* -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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -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))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda2)) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(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)))
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* 1/2 phi2)) 2))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (cos (* 1/2 phi2)) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (+ (* -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)))
(* -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))
(+ (* 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 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* 1/2 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (+ (* 1/2 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* 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)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* 1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* -1/48 (* phi1 (sin (* 1/2 phi2)))))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 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)))
(cos (* -1/2 (- phi1 phi2)))
(sin (* -1/2 (- phi2 phi1)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* 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 (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))))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(cos (* 1/2 (+ phi2 (* -1 phi1))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ 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))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -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)))
(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 (* 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 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* -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 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/2 (* 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 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (+ (* 1/2 (* lambda2 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* 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)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(cos (* -1/2 phi1))
(+ (cos (* -1/2 phi1)) (* -1/2 (* phi2 (sin (* -1/2 phi1)))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* -1/2 phi1)))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* -1/2 phi1))) (* 1/48 (* phi2 (sin (* -1/2 phi1)))))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (* 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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -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))
(* 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))))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(+ (* -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 (* -1 phi2)))) 2)))
(cos (* -1/2 (+ phi1 (* -1 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
Calls

15 calls:

TimeVariablePointExpression
18.0ms
phi2
@inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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)))))))) (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) (+ (pow (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (sin (/ (- lambda1 lambda2) 2)) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 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) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
13.0ms
lambda2
@-inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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)))))))) (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) (+ (pow (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (sin (/ (- lambda1 lambda2) 2)) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 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) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
12.0ms
phi1
@inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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)))))))) (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) (+ (pow (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (sin (/ (- lambda1 lambda2) 2)) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 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) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
11.0ms
lambda1
@-inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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)))))))) (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) (+ (pow (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (sin (/ (- lambda1 lambda2) 2)) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 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) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
10.0ms
lambda1
@inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 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)))))))) (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) (+ (pow (pow (sqrt (sin (/ (- phi1 phi2) 2))) 2) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (sin (/ (- lambda1 lambda2) 2)) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sin (* (- lambda2 lambda1) -1/2)) (sin (/ (- phi1 phi2) 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) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))

simplify238.0ms (0.8%)

Memory
1.9MiB live, 179.9MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07977550
129077270
080406930
Stop Event
iter limit
node limit
Counts
196 → 196
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)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))))) (pow (cos (* -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)))
(+ (* (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)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (+ (* -1/2 (* lambda2 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda1 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (+ (* -1/2 (* lambda2 (* (cos phi1) (cos phi2)))) (* lambda1 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 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)))))))))
(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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (- phi2 phi1))) 2)))
(sin (* 1/2 (- lambda1 lambda2)))
(pow (sin (* 1/2 (- lambda1 lambda2))) 2)
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sin (* -1/2 (- lambda2 lambda1)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))) (pow (cos (* -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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (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))))
(pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) 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)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (+ (* -1 (* 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) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -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)))
(+ (* (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 (sin (* -1/2 (- phi2 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)))))))))
(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))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))
(* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) lambda2) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda2))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))) (pow (cos (* -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))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -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))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda2)) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(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)))
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* 1/2 phi2)) 2))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (cos (* 1/2 phi2)) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (+ (* -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)))
(* -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))
(+ (* 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 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* 1/2 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (+ (* 1/2 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* 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)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* 1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* -1/48 (* phi1 (sin (* 1/2 phi2)))))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 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)))
(cos (* -1/2 (- phi1 phi2)))
(sin (* -1/2 (- phi2 phi1)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* 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 (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))))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(cos (* 1/2 (+ phi2 (* -1 phi1))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ 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))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -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)))
(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 (* 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 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* -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 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/2 (* 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 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (+ (* 1/2 (* lambda2 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* 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)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(cos (* -1/2 phi1))
(+ (cos (* -1/2 phi1)) (* -1/2 (* phi2 (sin (* -1/2 phi1)))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* -1/2 phi1)))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* -1/2 phi1))) (* 1/48 (* phi2 (sin (* -1/2 phi1)))))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (* 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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -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))
(* 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))))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(+ (* -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 (* -1 phi2)))) 2)))
(cos (* -1/2 (+ phi1 (* -1 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 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 (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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) lambda1 (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) lambda1 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* (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 phi2 phi1) #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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #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 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #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 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda1 (+ (* -1/2 (* lambda2 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda1 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda1 (+ (* -1/2 (* lambda2 (* (cos phi1) (cos phi2)))) (* lambda1 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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)))
(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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) 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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* 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 (fma.f64 (fma.f64 (*.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)) lambda1 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) 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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 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 phi2 phi1) #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 (- phi2 phi1))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (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 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) lambda1 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (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 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* (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 lambda2 lambda1) #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)))
(+ (* -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 (- phi2 phi1))) 2)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(pow (sin (* 1/2 (- lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(*.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 phi2) lambda1))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) lambda1)) lambda1)
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* (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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(*.f64 (neg.f64 lambda1) (neg.f64 (fma.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 phi2) lambda1))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (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))))
(fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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 (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (+ (* -1 (* 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) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2))) (cos.f64 phi1) (fma.f64 (fma.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* -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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* (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 phi2 phi1) #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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #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 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 phi2 phi1) #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 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 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 phi2 phi1) #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 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (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)))
(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 (neg.f64 lambda2) (*.f64 (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 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) lambda2 (*.f64 (neg.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)))
(+ (* 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)) lambda2 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) lambda2 (*.f64 (neg.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)))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2))) lambda2)) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))
(* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))
(*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))
(* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) lambda2) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda2))))
(*.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (/.f64 (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) lambda2)) lambda2)
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* (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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda2)) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))
(*.f64 (neg.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 phi1) (/.f64 (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (neg.f64 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* 1/2 phi2)) 2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (cos (* 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) (fma.f64 (*.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)) phi1 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 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 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.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 lambda2 lambda1) #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 (*.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 lambda2 lambda1) #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 (+ (* -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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) 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 lambda2 lambda1) #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 (+ (* -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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 (*.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)) phi1))) 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 lambda2 lambda1) #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 (sin (* 1/2 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(- (* 1/2 (* phi1 (cos (* 1/2 phi2)))) (sin (* 1/2 phi2)))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(- (* phi1 (+ (* 1/8 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (cos (* 1/2 phi2))))) (sin (* 1/2 phi2)))
(-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) 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)))
(-.f64 (*.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)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.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 lambda2 lambda1) #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))))) (* (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) 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 lambda2 lambda1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) #s(literal -1/2 binary64) (fma.f64 (*.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)) phi1 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 lambda2 lambda1) #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 (*.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)))
(+ (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 (*.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 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 (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 (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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* 1/2 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (neg.f64 (*.f64 (*.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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* -1 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (+ (* 1/2 (* lambda2 (* (cos phi2) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* 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)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1/2 binary64) (*.f64 (*.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)) phi1)))) 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* 1/2 (* phi1 (sin (* 1/2 phi2)))))
(fma.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) phi2)))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* -1/2 (sin (* 1/2 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/2 binary64))) phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* -1/48 (* phi1 (sin (* 1/2 phi2)))))) (* -1/2 (sin (* 1/2 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/8 binary64))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/2 binary64))) phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.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 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (fma.f64 (*.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)) phi1 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) 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 #s(literal -1/2 binary64) lambda2)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi2 (PI.f64))) (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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (neg.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 lambda2 lambda1) #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 (-.f64 (*.f64 (neg.f64 phi1) (*.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))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (neg.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 lambda2 lambda1) #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) 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 (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(cos (* -1/2 (- phi1 phi2)))
(cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(sin (* -1/2 (- phi2 phi1)))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/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 (+ phi2 (* -1 phi1)))) 2)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(cos (* 1/2 (+ phi2 (* -1 phi1))))
(cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/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 (+ phi2 (* -1 phi1)))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 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 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -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) (fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 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 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.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 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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/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 (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 (- (* 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64))) 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)))
(+ (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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64))) 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 (* 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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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)))))) (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (neg.f64 phi2) (*.f64 (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 #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 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/2 (* 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 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) lambda2 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (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 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (+ (* 1/2 (* lambda2 (* (cos phi1) (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* 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)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi1)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))) (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2)))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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)))))
(cos (* -1/2 phi1))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))
(+ (cos (* -1/2 phi1)) (* -1/2 (* phi2 (sin (* -1/2 phi1)))))
(fma.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)))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* -1/2 phi1)))) (* 1/2 (sin (* -1/2 phi1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* -1/2 phi1))) (* 1/48 (* phi2 (sin (* -1/2 phi1)))))) (* 1/2 (sin (* -1/2 phi1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal -1/8 binary64))) phi2 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)))
(+ (* 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 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 (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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.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 (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)))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (*.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 (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)))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.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 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (*.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 (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 (+ (* (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 lambda2 lambda1) #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 (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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) (*.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 lambda2 lambda1) #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 (-.f64 (*.f64 (neg.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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)))))) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))
(* 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/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 (* -1 phi2)))) 2)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(cos (* -1/2 (+ phi1 (* -1 phi2))))
(cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/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 (* -1 phi2)))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))

rewrite271.0ms (0.9%)

Memory
-7.9MiB live, 240.3MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01271104
0217970
1686958
24686958
08491939
Stop Event
iter limit
node limit
iter limit
Counts
26 → 497
Calls
Call 1
Inputs
(*.f64 (*.f64 (*.f64 (cos.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 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 phi2 phi1) #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 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 phi2 phi1) #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))))))))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
#s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))
#s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(sin.f64 (/.f64 (-.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))))))
#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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
Outputs
(*.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (*.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)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 4 binary64)) (*.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (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)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 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 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))
(*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sinh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(+.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)) (*.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64))))
(fma.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)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) (fabs.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))))) (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))))) (exp.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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 (/.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 4 binary64)))))
(+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))
(*.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(*.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 2 binary64)) R)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(+.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) R))
(+.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (-.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(+.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))
(*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sinh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 4 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) lambda2) (neg.f64 (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.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))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (neg.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1))) lambda2 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (*.f64 (*.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 lambda2 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1)))))
(+.f64 (fma.f64 (*.f64 (*.f64 (neg.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))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)))))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1))))
(+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.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 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(*.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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(+.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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1 binary64))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal -2 binary64)))))
(sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal -2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 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/2 binary64)))
(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)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 1/2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 1/2 binary64)))
(pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 1 binary64))
#s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))
(exp.f64 (*.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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))))) #s(literal 1 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))
(*.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 (log.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sinh.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 4 binary64)) (*.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (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)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1 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 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (neg.f64 lambda2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))

eval221.0ms (0.7%)

Memory
30.3MiB live, 310.2MiB allocated
Compiler

Compiled 90 898 to 4 980 computations (94.5% saved)

prune430.0ms (1.4%)

Memory
-10.9MiB live, 419.3MiB allocated
Pruning

137 alts after pruning (137 fresh and 0 done)

PrunedKeptTotal
New76758825
Fresh3279111
Picked505
Done000
Total804137941
Accuracy
64.1%
Counts
941 → 137
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
40.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #s(literal 2 binary64)))
29.3%
(*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
37.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #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))))))))))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
40.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
33.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
26.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
25.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))))
28.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))))
57.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
59.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
26.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
27.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
61.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
60.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
43.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
36.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
36.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
47.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
47.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
46.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
45.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
49.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
41.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
47.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
43.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
51.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
50.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
44.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
59.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 (/.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
59.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
60.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) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (/.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.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 phi1 phi2) #s(literal 2 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))))))))))
36.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 #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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))))))))))
45.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 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
46.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 #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))))))))))
44.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) #s(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 phi2 phi1) #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)))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
39.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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1))))))))
39.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 #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 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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))))))))))
39.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (*.f64 (*.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 (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))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
20.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
24.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (-.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
31.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
39.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
8.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
29.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)))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
43.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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
33.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) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
30.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))))) (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 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
41.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
41.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.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)))))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
40.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (-.f64 (*.f64 (neg.f64 phi1) (*.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))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (neg.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
28.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))
24.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
40.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (neg.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
26.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
31.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
26.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
39.2%
(*.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.7%
(*.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 (-.f64 (*.f64 (-.f64 #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) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))))
40.7%
(*.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
40.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
30.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
32.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
40.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 #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))))))))))
41.0%
(*.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) #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
30.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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
32.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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
41.0%
(*.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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
26.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
29.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
27.4%
(*.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)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
43.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))))))))
43.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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) 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))))))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
40.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
29.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))) #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)))))))))))
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 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
38.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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
22.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
34.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 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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
46.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 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 phi2 phi1) #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))))))))))
36.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
35.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 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 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
33.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 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 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
36.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 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
39.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (PI.f64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (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))))))))))
14.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)))) (-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
24.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
30.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
25.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
14.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 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))))))))))
15.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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))))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
21.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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)))))))))))
28.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
28.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
28.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
27.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
24.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
19.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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))))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
6.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
26.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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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))))))))))
6.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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.8%
(*.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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
59.8%
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))))
60.7%
#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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))))))))
Compiler

Compiled 28 026 to 14 650 computations (47.7% saved)

simplify129.0ms (0.4%)

Memory
-8.5MiB live, 174.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

IterNodesCost
01553656
02653367
14513337
210493301
333203235
080373117
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))
(sin.f64 (/.f64 phi1 #s(literal 2 binary64)))
(/.f64 phi1 #s(literal 2 binary64))
phi1
(cos.f64 (/.f64 phi2 #s(literal 2 binary64)))
(/.f64 phi2 #s(literal 2 binary64))
phi2
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))
(cos.f64 (/.f64 phi1 #s(literal 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 (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))
(-.f64 phi1 phi2)
#s(literal -2 binary64)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(/.f64 lambda1 #s(literal 2 binary64))
(cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))
(/.f64 lambda2 #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(sin.f64 (/.f64 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64)
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 phi1)
phi2
phi1
#s(literal -1/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 lambda2 lambda1) #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 #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 lambda2 lambda1) #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 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 lambda2 lambda1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi2)
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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))))))))
(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 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/2 binary64))) #s(literal 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/2 binary64)))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 phi1)
phi2
phi1
#s(literal -1/2 binary64)
#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)))))
(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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(neg.f64 phi2)
phi2
(*.f64 (cos.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) phi1))
(*.f64 #s(literal -1/2 binary64) phi1)
#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)
(fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))
(-.f64 phi1 phi2)
#s(literal -2 binary64)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi2)
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
#s(literal 1 binary64)
(+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(/.f64 lambda1 #s(literal 2 binary64))
(cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))
(/.f64 lambda2 #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #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)))))) #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))
(sin.f64 (/.f64 phi1 #s(literal 2 binary64)))
(/.f64 phi1 #s(literal 2 binary64))
phi1
(cos.f64 (/.f64 phi2 #s(literal 2 binary64)))
(cos.f64 (/.f64 phi2 #s(literal -2 binary64)))
(/.f64 phi2 #s(literal 2 binary64))
phi2
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))
(cos.f64 (/.f64 phi1 #s(literal 2 binary64)))
(cos.f64 (/.f64 phi1 #s(literal -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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #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)))))
(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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #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))))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))
(-.f64 phi1 phi2)
#s(literal -2 binary64)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)))
(neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) #s(literal 2 binary64))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))
(sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(/.f64 lambda1 #s(literal 2 binary64))
(cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))
(cos.f64 (/.f64 lambda2 #s(literal -2 binary64)))
(/.f64 lambda2 #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))))
(cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))
(sin.f64 (/.f64 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 phi1)
phi2
phi1
#s(literal -1/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 lambda2 lambda1) #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 #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 lambda2 lambda1) #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 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 lambda2 lambda1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi2)
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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 (*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 2 binary64)))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 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/2 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 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/2 binary64)))
(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/2 binary64))
(sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))
(-.f64 phi2 phi1)
phi2
phi1
#s(literal -1/2 binary64)
#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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))) #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(neg.f64 phi2)
phi2
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.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) phi1)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal -1/2 binary64) phi1)
#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)
(fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))
(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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))
(-.f64 phi1 phi2)
#s(literal -2 binary64)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (cos.f64 phi2))
(neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi2)
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))
(*.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(-.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))) (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda2 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))
(sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(/.f64 lambda1 #s(literal 2 binary64))
(cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))
(cos.f64 (/.f64 lambda2 #s(literal -2 binary64)))
(/.f64 lambda2 #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))
(*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))))
(cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))
(cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))
(sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))

localize1.3s (4.2%)

Memory
45.7MiB live, 1 233.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.1640625
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
accuracy0.3996503616931893
(-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
accuracy6.203629685530107
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy6.305256216713456
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy6.625003869076437
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
accuracy13.738001988618052
#s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
accuracy6.203629685530107
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
accuracy15.481616879699898
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 2 binary64))))
accuracy20.205433977701283
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 2 binary64)))
accuracy6.625003869076437
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
accuracy15.105099269007482
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))
accuracy15.481616879699898
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
accuracy20.205433977701283
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
accuracy0.2265625
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))
accuracy0.3166239203953413
(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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
accuracy6.305256216713456
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
accuracy6.625003869076437
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Samples
564.0ms124×1valid
394.0ms87×1invalid
35.0ms37×0invalid
8.0ms0valid
Compiler

Compiled 2 840 to 118 computations (95.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 869.0ms
ival-sin: 264.0ms (30.4% of total)
ival-cos: 253.0ms (29.1% of total)
ival-mult: 130.0ms (15% of total)
adjust: 71.0ms (8.2% of total)
ival-pow2: 48.0ms (5.5% of total)
ival-add: 25.0ms (2.9% of total)
ival-sqrt: 22.0ms (2.5% of total)
ival-atan2: 21.0ms (2.4% of total)
ival-sub: 17.0ms (2% of total)
ival-div: 15.0ms (1.7% of total)
ival-neg: 3.0ms (0.3% of total)
exact: 1.0ms (0.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series321.0ms (1%)

Memory
-24.4MiB live, 367.2MiB allocated
Counts
31 → 287
Calls
Call 1
Inputs
(*.f64 (*.f64 (*.f64 (cos.f64 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 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/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 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda2 lambda1) #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.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 2 binary64))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
#s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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.f64 (/.f64 (-.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)))))))
(* 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 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* 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))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/8 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* -1 (* (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))))))) (pow (cos (* -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 (sin (* 1/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)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))))) (pow (cos (* -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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda1 (+ (* 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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda1 (+ (* lambda1 (+ (* 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))))
(* 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 phi2))) 2)))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* -1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* 1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* -1 (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/48 (* lambda1 (cos (* 1/2 lambda2)))) (* -1/8 (sin (* 1/2 lambda2))))))) (sin (* 1/2 lambda2)))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(pow (sin (* 1/2 lambda2)) 2)
(+ (* -1 (* lambda1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))) (pow (sin (* 1/2 lambda2)) 2))
(+ (* lambda1 (+ (* -1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* lambda1 (+ (* -1/4 (pow (sin (* 1/2 lambda2)) 2)) (* 1/4 (pow (cos (* 1/2 lambda2)) 2)))))) (pow (sin (* 1/2 lambda2)) 2))
(+ (* lambda1 (+ (* -1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* lambda1 (+ (* -1/4 (pow (sin (* 1/2 lambda2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 lambda2)) 2)) (* lambda1 (+ (* 1/24 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/8 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (pow (sin (* 1/2 lambda2)) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)))
(- 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* -1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* 1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* -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))
(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))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))
(sin (* 1/2 (- lambda1 lambda2)))
(pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(sin (* -1/2 (- lambda2 lambda1)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 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 (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))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))) (pow (cos (* -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)))
(* 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 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 (cos (* -1/2 (- phi1 phi2))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 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))))
(+ (* 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (+ (* -1 (* 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) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -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)))
(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)))
(+ (* -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)))))) (+ (* -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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* 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)))))))) (+ (* (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/8 (* lambda2 (sin (* 1/2 lambda1)))) (* 1/2 (cos (* 1/2 lambda1))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))) (* 1/2 (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)))))))))
(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))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 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 (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))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))) (pow (cos (* -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)))
(* 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 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 (cos (* -1/2 (- phi1 phi2))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* 1/2 phi2)) 2))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 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 (cos (* 1/2 phi2)) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (+ (* -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)))
(* -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)))
(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)))))))))))
(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)))))))))
(sqrt (sin (* -1/2 phi2)))
(+ (sqrt (sin (* -1/2 phi2))) (* 1/4 (* (* phi1 (cos (* -1/2 phi2))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))
(+ (sqrt (sin (* -1/2 phi2))) (* phi1 (+ (* 1/4 (* (cos (* -1/2 phi2)) (sqrt (/ 1 (sin (* -1/2 phi2)))))) (* 1/2 (* (* phi1 (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2)))))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))))
(+ (sqrt (sin (* -1/2 phi2))) (* phi1 (+ (* 1/4 (* (cos (* -1/2 phi2)) (sqrt (/ 1 (sin (* -1/2 phi2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (sin (* -1/2 phi2)))) (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2))))))) (* 1/2 (* (* phi1 (- (* -1/48 (cos (* -1/2 phi2))) (* 1/4 (/ (* (cos (* -1/2 phi2)) (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2)))))) (sin (* -1/2 phi2)))))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))))))
(+ (* (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 (cos (* 1/2 phi2)) 2))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (cos (* 1/2 phi2)) 2)))
(pow (sin (* -1/2 (- lambda2 lambda1))) 2)
(+ (* -1/2 (* phi1 phi2)) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* phi1 (+ (* -1/2 phi2) (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* phi1 (+ (* -1/2 phi2) (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (* 1/12 (* phi1 phi2))))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* 1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* -1/48 (* phi1 (sin (* 1/2 phi2)))))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (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 (- phi2 phi1)))
(sqrt (sin (* -1/2 (- phi2 phi1))))
(cos (* -1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (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)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sqrt (sin (* -1/2 (+ phi2 (* -1 phi1)))))
(+ (* (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 (cos (* 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 (cos (* 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 (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(cos (* 1/2 (+ phi2 (* -1 phi1))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* -1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -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)))
(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))))))
(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)))))))))))
(+ (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)))))))))
(sqrt (sin (* 1/2 phi1)))
(+ (sqrt (sin (* 1/2 phi1))) (* -1/4 (* (* phi2 (cos (* 1/2 phi1))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))
(+ (sqrt (sin (* 1/2 phi1))) (* phi2 (+ (* -1/4 (* (cos (* 1/2 phi1)) (sqrt (/ 1 (sin (* 1/2 phi1)))))) (* 1/2 (* (* phi2 (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))))
(+ (sqrt (sin (* 1/2 phi1))) (* phi2 (+ (* -1/4 (* (cos (* 1/2 phi1)) (sqrt (/ 1 (sin (* 1/2 phi1)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (sin (* 1/2 phi1)))) (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1))))))) (* 1/2 (* (* phi2 (- (* 1/48 (cos (* 1/2 phi1))) (* -1/4 (/ (* (cos (* 1/2 phi1)) (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))) (sin (* 1/2 phi1)))))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(cos (* -1/2 phi1))
(+ (cos (* -1/2 phi1)) (* -1/2 (* phi2 (sin (* -1/2 phi1)))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* -1/2 phi1)))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* -1/2 phi1))) (* 1/48 (* phi2 (sin (* -1/2 phi1)))))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (* 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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(- 1 (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (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)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sqrt (sin (* 1/2 (+ phi1 (* -1 phi2)))))
(+ (* (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 (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(* -1 (* phi2 (+ (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))))
(* 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 (* -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 (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(cos (* -1/2 (+ phi1 (* -1 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
Calls

15 calls:

TimeVariablePointExpression
83.0ms
phi1
@inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))))))) (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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)))) (sin (* (- lambda2 lambda1) -1/2)) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ 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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2))))))))))
59.0ms
phi2
@-inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))))))) (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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)))) (sin (* (- lambda2 lambda1) -1/2)) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ 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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2))))))))))
23.0ms
lambda1
@inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))))))) (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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)))) (sin (* (- lambda2 lambda1) -1/2)) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ 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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2))))))))))
22.0ms
lambda2
@inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))))))) (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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)))) (sin (* (- lambda2 lambda1) -1/2)) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ 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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2))))))))))
20.0ms
lambda2
@-inf
((* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (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 (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))))))) (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) (sin (/ (- lambda1 lambda2) 2)) (cos (/ (- phi1 phi2) -2)) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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)))) (sin (* (- lambda2 lambda1) -1/2)) (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (* (- phi2 phi1) -1/2)) (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (sin (/ (- phi1 phi2) 2)) (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ 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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2))))))))))

simplify233.0ms (0.7%)

Memory
14.6MiB live, 248.0MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0125513968
1448313908
0900213168
Stop Event
iter limit
node limit
Counts
287 → 287
Calls
Call 1
Inputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (- (* (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 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* 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))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/8 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* -1 (* (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))))))) (pow (cos (* -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 (sin (* 1/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)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))))) (pow (cos (* -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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda1 (+ (* 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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda1 (+ (* lambda1 (+ (* 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))))
(* 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 phi2))) 2)))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* -1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* 1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* -1 (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/48 (* lambda1 (cos (* 1/2 lambda2)))) (* -1/8 (sin (* 1/2 lambda2))))))) (sin (* 1/2 lambda2)))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(pow (sin (* 1/2 lambda2)) 2)
(+ (* -1 (* lambda1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))) (pow (sin (* 1/2 lambda2)) 2))
(+ (* lambda1 (+ (* -1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* lambda1 (+ (* -1/4 (pow (sin (* 1/2 lambda2)) 2)) (* 1/4 (pow (cos (* 1/2 lambda2)) 2)))))) (pow (sin (* 1/2 lambda2)) 2))
(+ (* lambda1 (+ (* -1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* lambda1 (+ (* -1/4 (pow (sin (* 1/2 lambda2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 lambda2)) 2)) (* lambda1 (+ (* 1/24 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/8 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (pow (sin (* 1/2 lambda2)) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)))
(- 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* -1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* 1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* -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))
(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))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))
(sin (* 1/2 (- lambda1 lambda2)))
(pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(sin (* -1/2 (- lambda2 lambda1)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 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 (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))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))) (pow (cos (* -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)))
(* 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 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 (cos (* -1/2 (- phi1 phi2))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 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))))
(+ (* 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))))
(+ (* 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))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (+ (* -1 (* 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) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -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)))
(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)))
(+ (* -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)))))) (+ (* -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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* 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)))))))) (+ (* (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/8 (* lambda2 (sin (* 1/2 lambda1)))) (* 1/2 (cos (* 1/2 lambda1))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))) (* 1/2 (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)))))))))
(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))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 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 (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))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))) (pow (cos (* -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)))
(* 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 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 (cos (* -1/2 (- phi1 phi2))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* 1/2 phi2)) 2))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 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 (cos (* 1/2 phi2)) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (+ (* -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)))
(* -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)))
(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)))))))))))
(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)))))))))
(sqrt (sin (* -1/2 phi2)))
(+ (sqrt (sin (* -1/2 phi2))) (* 1/4 (* (* phi1 (cos (* -1/2 phi2))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))
(+ (sqrt (sin (* -1/2 phi2))) (* phi1 (+ (* 1/4 (* (cos (* -1/2 phi2)) (sqrt (/ 1 (sin (* -1/2 phi2)))))) (* 1/2 (* (* phi1 (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2)))))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))))
(+ (sqrt (sin (* -1/2 phi2))) (* phi1 (+ (* 1/4 (* (cos (* -1/2 phi2)) (sqrt (/ 1 (sin (* -1/2 phi2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (sin (* -1/2 phi2)))) (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2))))))) (* 1/2 (* (* phi1 (- (* -1/48 (cos (* -1/2 phi2))) (* 1/4 (/ (* (cos (* -1/2 phi2)) (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2)))))) (sin (* -1/2 phi2)))))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))))))
(+ (* (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 (cos (* 1/2 phi2)) 2))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (cos (* 1/2 phi2)) 2)))
(pow (sin (* -1/2 (- lambda2 lambda1))) 2)
(+ (* -1/2 (* phi1 phi2)) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* phi1 (+ (* -1/2 phi2) (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* phi1 (+ (* -1/2 phi2) (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (* 1/12 (* phi1 phi2))))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* 1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* -1/48 (* phi1 (sin (* 1/2 phi2)))))) (* -1/2 (sin (* 1/2 phi2))))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (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 (- phi2 phi1)))
(sqrt (sin (* -1/2 (- phi2 phi1))))
(cos (* -1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (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)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sqrt (sin (* -1/2 (+ phi2 (* -1 phi1)))))
(+ (* (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 (cos (* 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 (cos (* 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 (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(cos (* 1/2 (+ phi2 (* -1 phi1))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* -1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -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)))
(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))))))
(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)))))))))))
(+ (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)))))))))
(sqrt (sin (* 1/2 phi1)))
(+ (sqrt (sin (* 1/2 phi1))) (* -1/4 (* (* phi2 (cos (* 1/2 phi1))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))
(+ (sqrt (sin (* 1/2 phi1))) (* phi2 (+ (* -1/4 (* (cos (* 1/2 phi1)) (sqrt (/ 1 (sin (* 1/2 phi1)))))) (* 1/2 (* (* phi2 (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))))
(+ (sqrt (sin (* 1/2 phi1))) (* phi2 (+ (* -1/4 (* (cos (* 1/2 phi1)) (sqrt (/ 1 (sin (* 1/2 phi1)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (sin (* 1/2 phi1)))) (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1))))))) (* 1/2 (* (* phi2 (- (* 1/48 (cos (* 1/2 phi1))) (* -1/4 (/ (* (cos (* 1/2 phi1)) (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))) (sin (* 1/2 phi1)))))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -1/2 phi1)) 2)))
(+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(cos (* -1/2 phi1))
(+ (cos (* -1/2 phi1)) (* -1/2 (* phi2 (sin (* -1/2 phi1)))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* -1/2 phi1)))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* -1/2 phi1))) (* 1/48 (* phi2 (sin (* -1/2 phi1)))))) (* 1/2 (sin (* -1/2 phi1))))))
(+ (* 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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(- 1 (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (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)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sqrt (sin (* 1/2 (+ phi1 (* -1 phi2)))))
(+ (* (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 (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(* -1 (* phi2 (+ (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))))
(* 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 (* -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 (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(cos (* -1/2 (+ phi1 (* -1 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (- (* (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 phi2))) 2))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #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))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* 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))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (cos.f64 phi1) (fma.f64 (fma.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/8 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* -1 (* (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))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (cos.f64 phi1) (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal 1/6 binary64)) (cos.f64 phi2))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(fma.f64 (*.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) #s(literal 1/2 binary64) (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) lambda1) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) lambda1 (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (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) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) lambda1) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) lambda1 (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (cos.f64 phi1) (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2))) (cos.f64 phi1) (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))))) lambda1 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))
(fma.f64 (neg.f64 phi2) (*.f64 (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 #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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda1 (+ (* 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 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.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 (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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda1 (+ (* lambda1 (+ (* 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 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi1))) lambda1 (*.f64 (*.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 (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)))))
(* 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 phi2))) 2)))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) #s(literal 2 binary64))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))) (cos.f64 phi1) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))) (cos.f64 phi1) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) lambda1 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* -1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* 1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))) (cos.f64 phi1) (fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (*.f64 #s(literal -1/48 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal 1/12 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) lambda1 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* -1 (sin (* 1/2 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(- (* 1/2 (* lambda1 (cos (* 1/2 lambda2)))) (sin (* 1/2 lambda2)))
(-.f64 (*.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)))
(- (* lambda1 (+ (* 1/8 (* lambda1 (sin (* 1/2 lambda2)))) (* 1/2 (cos (* 1/2 lambda2))))) (sin (* 1/2 lambda2)))
(-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))
(- (* lambda1 (+ (* 1/2 (cos (* 1/2 lambda2))) (* lambda1 (- (* -1/48 (* lambda1 (cos (* 1/2 lambda2)))) (* -1/8 (sin (* 1/2 lambda2))))))) (sin (* 1/2 lambda2)))
(-.f64 (*.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)))
(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)))
(pow (sin (* 1/2 lambda2)) 2)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64))
(+ (* -1 (* lambda1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))) (pow (sin (* 1/2 lambda2)) 2))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) lambda1) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* lambda1 (+ (* -1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* lambda1 (+ (* -1/4 (pow (sin (* 1/2 lambda2)) 2)) (* 1/4 (pow (cos (* 1/2 lambda2)) 2)))))) (pow (sin (* 1/2 lambda2)) 2))
(fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) lambda1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) lambda1 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* lambda1 (+ (* -1 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* lambda1 (+ (* -1/4 (pow (sin (* 1/2 lambda2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 lambda2)) 2)) (* lambda1 (+ (* 1/24 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/8 (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (pow (sin (* 1/2 lambda2)) 2))
(fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal 1/6 binary64)) lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) lambda1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) lambda1 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 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 phi2 phi1) #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 (- phi2 phi1))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (cos.f64 phi2)) #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) lambda1 #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* -1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (+ (* 1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (fma.f64 (*.f64 #s(literal -1/48 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal 1/12 binary64)))) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) lambda1 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) lambda1 #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(*.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)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (+ (* (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 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))))
(+ (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.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)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64))
(* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))
(*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(* lambda1 (+ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (/ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) lambda1) (/ (pow (sin (* -1/2 (- phi2 phi1))) 2) lambda1))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (cos.f64 phi1) (/.f64 (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) lambda1)) lambda1)
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #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 (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(* 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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) #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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ 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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))
(fma.f64 (neg.f64 phi2) (*.f64 (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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (- (* (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 phi2))) 2))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (- (* (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 phi2))) 2)))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) #s(literal 2 binary64))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 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) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64)))
(* -1 (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* -1 (/ (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (- phi2 phi1))) 2)) lambda1)))))
(*.f64 (neg.f64 lambda1) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (cos.f64 phi1) (/.f64 (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) lambda1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 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) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda1 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) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (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))))
(fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.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 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (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))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (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 (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* lambda2 (+ (* -1 (* 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) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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)))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* 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))))))))) (* -1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (cos (* -1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2))) (cos.f64 phi1) (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (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)))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(+ (* -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 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 lambda2 (cos.f64 phi1)) (*.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 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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))))
(+ (* 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 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (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))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(fma.f64 (*.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) #s(literal -1/2 binary64) (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.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 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) lambda2) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) lambda2 (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.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 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.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)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (*.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 phi2)) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) lambda2) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) lambda2 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) lambda2 (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.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 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (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))))) lambda2 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))
(fma.f64 (neg.f64 phi2) (*.f64 (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 #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)))))) (+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (neg.f64 phi2) (*.f64 (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 #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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (fma.f64 (*.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 (* phi2 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* 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)))))))) (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (fma.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 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (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 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(+ (sin (* 1/2 lambda1)) (* lambda2 (- (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))) (* 1/2 (cos (* 1/2 lambda1))))))
(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 (- (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))) (* 1/2 (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 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) 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)))
(+ (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 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) 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)))
(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 (neg.f64 lambda2) (*.f64 (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 (cos.f64 (fma.f64 #s(literal -1/2 binary64) lambda1 (PI.f64))) (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)))
(+ (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.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)) lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) lambda2 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) lambda1 (PI.f64))) (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)))
(pow (sin (* -1/2 (- phi2 phi1))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(+ (* -1/2 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* 1/4 (* lambda2 (* (cos phi1) (cos phi2)))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda2 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 1/12 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* 1/4 (* (cos phi1) (cos phi2))))))) (pow (sin (* -1/2 (- phi2 phi1))) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2))) lambda2)) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (fma.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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)))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 #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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))
(-.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (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)))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 #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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #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 (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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)))
(* 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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) #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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))) (pow (cos (* -1/2 (- phi1 phi2))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))
(fma.f64 (neg.f64 phi2) (*.f64 (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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (- (* (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 phi2))) 2))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (- (* (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 phi2))) 2)))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) #s(literal 2 binary64))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(fma.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) (cos.f64 phi2)) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 (*.f64 phi1 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* 1/2 phi2)) 2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64))) (cos.f64 phi2) (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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 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 (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64))) (cos.f64 phi2) (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) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (*.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)) phi1)))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (pow.f64 (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (+ (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.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)) phi1 (*.f64 (pow.f64 (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(* -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)))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(- (* phi1 (+ (* 1/8 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (cos (* 1/2 phi2))))) (sin (* 1/2 phi2)))
(-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) 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)))
(-.f64 (*.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)))
(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.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)) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) (fma.f64 (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))) (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1) (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))) phi1 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.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)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) phi1 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.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)))
(+ (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 (*.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)))
(sqrt (sin (* -1/2 phi2)))
(sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(+ (sqrt (sin (* -1/2 phi2))) (* 1/4 (* (* phi1 (cos (* -1/2 phi2))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1)) #s(literal 1/4 binary64) (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(+ (sqrt (sin (* -1/2 phi2))) (* phi1 (+ (* 1/4 (* (cos (* -1/2 phi2)) (sqrt (/ 1 (sin (* -1/2 phi2)))))) (* 1/2 (* (* phi1 (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2)))))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/8 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))) phi1 (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(+ (sqrt (sin (* -1/2 phi2))) (* phi1 (+ (* 1/4 (* (cos (* -1/2 phi2)) (sqrt (/ 1 (sin (* -1/2 phi2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (sin (* -1/2 phi2)))) (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2))))))) (* 1/2 (* (* phi1 (- (* -1/48 (cos (* -1/2 phi2))) (* 1/4 (/ (* (cos (* -1/2 phi2)) (- (* -1/8 (sin (* -1/2 phi2))) (* 1/16 (/ (pow (cos (* -1/2 phi2)) 2) (sin (* -1/2 phi2)))))) (sin (* -1/2 phi2)))))) (sqrt (/ 1 (sin (* -1/2 phi2)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/8 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/8 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))) phi1 (*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))) phi1 (sqrt.f64 (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.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)) phi1 (*.f64 (pow.f64 (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (cos (* 1/2 phi2)) 2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (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) phi2)) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (pow (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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 (cos (* 1/2 phi2)) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi2) (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) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (fma.f64 (*.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)) phi1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(pow (sin (* -1/2 (- lambda2 lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(+ (* -1/2 (* phi1 phi2)) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (+ (* -1/2 phi2) (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (+ (* -1/2 phi2) (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (* 1/12 (* phi1 phi2))))))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 (fma.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 phi1) #s(literal 1/12 binary64))) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.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 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.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)) phi1 (*.f64 (pow.f64 (cos.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 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* 1/2 (* phi1 (sin (* 1/2 phi2)))))
(fma.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) phi2)))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* -1/2 (sin (* 1/2 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/2 binary64))) phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* -1/48 (* phi1 (sin (* 1/2 phi2)))))) (* -1/2 (sin (* 1/2 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/2 binary64))) phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.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 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.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 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.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)) phi1 (*.f64 (pow.f64 (cos.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 #s(literal 1/2 binary64) lambda2)) #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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (fma.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) phi2 (PI.f64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) phi1 #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 phi1) (*.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))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))))) phi1 (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) phi1 #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (* (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) 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 (* -1/2 (- phi2 phi1)))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(sqrt (sin (* -1/2 (- phi2 phi1))))
(sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))
(cos (* -1/2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (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 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64)))
(sqrt (sin (* -1/2 (+ phi2 (* -1 phi1)))))
(sqrt.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.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)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #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 (cos (* 1/2 (+ phi2 (* -1 phi1)))) 2)))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(cos (* 1/2 (+ phi2 (* -1 phi1))))
(cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/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 (+ phi2 (* -1 phi1)))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(fma.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 phi1)) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/24 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal -1/720 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* -1/2 phi1)) 2))
(fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))))))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64))) (cos.f64 phi1) (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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64))) (cos.f64 phi1) (fma.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (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) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2)))) phi2)) phi2 (pow.f64 (cos.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 #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) 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 (neg.f64 phi2) (*.f64 (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 #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) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.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) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.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)) phi2 (*.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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.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) 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/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 (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 (- (* 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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal -1/2 binary64))) phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(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 #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) 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 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.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)) (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 #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) 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 (fma.f64 (*.f64 phi2 (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 (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) phi1)) #s(literal 2 binary64)) (fma.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) phi1)) #s(literal 2 binary64))))) #s(literal 1/4 binary64))) (sqrt.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)) (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 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.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) phi1)) #s(literal 2 binary64))))))) phi2 (sqrt.f64 (fma.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) 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) (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 (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) phi1)) #s(literal 2 binary64)) (fma.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) phi1)) #s(literal 2 binary64))))) #s(literal 1/4 binary64))) (sqrt.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)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (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 (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) phi1)) #s(literal 2 binary64)) (fma.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) phi1)) #s(literal 2 binary64))))) #s(literal 1/4 binary64)))) (fma.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) phi1)) #s(literal 2 binary64)))))) phi2) (sqrt.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)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) phi2 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.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) phi1)) #s(literal 2 binary64))))))) phi2 (sqrt.f64 (fma.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) phi1)) #s(literal 2 binary64)))))
(+ (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 (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)))
(sqrt (sin (* 1/2 phi1)))
(sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sqrt (sin (* 1/2 phi1))) (* -1/4 (* (* phi2 (cos (* 1/2 phi1))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2)) #s(literal -1/4 binary64) (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (sqrt (sin (* 1/2 phi1))) (* phi2 (+ (* -1/4 (* (cos (* 1/2 phi1)) (sqrt (/ 1 (sin (* 1/2 phi1)))))) (* 1/2 (* (* phi2 (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) phi2 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (sqrt (sin (* 1/2 phi1))) (* phi2 (+ (* -1/4 (* (cos (* 1/2 phi1)) (sqrt (/ 1 (sin (* 1/2 phi1)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (sin (* 1/2 phi1)))) (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1))))))) (* 1/2 (* (* phi2 (- (* 1/48 (cos (* 1/2 phi1))) (* -1/4 (/ (* (cos (* 1/2 phi1)) (- (* -1/8 (sin (* 1/2 phi1))) (* 1/16 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))) (sin (* 1/2 phi1)))))) (sqrt (/ 1 (sin (* 1/2 phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 (fma.f64 #s(literal 1/48 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (/.f64 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) phi2 (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) phi2 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 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)))
(+ (* -1 (* phi2 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1))))) (+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) 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))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))) (pow (cos (* -1/2 phi1)) 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)) (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) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* -1 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (cos (* -1/2 phi1)) 2)) (+ (* 1/4 (pow (sin (* -1/2 phi1)) 2)) (+ (* 1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/24 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))) (* 1/8 (* (cos (* -1/2 phi1)) (sin (* -1/2 phi1)))))))))))) (pow (cos (* -1/2 phi1)) 2)))
(fma.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (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) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) phi2 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(cos (* -1/2 phi1))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))
(+ (cos (* -1/2 phi1)) (* -1/2 (* phi2 (sin (* -1/2 phi1)))))
(fma.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)))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* -1/2 phi1)))) (* 1/2 (sin (* -1/2 phi1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)))
(+ (cos (* -1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* -1/2 phi1))) (* 1/48 (* phi2 (sin (* -1/2 phi1)))))) (* 1/2 (sin (* -1/2 phi1))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)))) phi2 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)))
(+ (* 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 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* 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 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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)))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (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)))))
(+ (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) phi2 (*.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 (fma.f64 #s(literal 1/2 binary64) phi1 (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) phi2 (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 (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 (fma.f64 (neg.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (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 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) phi2 #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (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 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) phi2 #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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)))))
(*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* phi2 (+ (* -1 (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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)
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2)))) 2)))) (pow (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (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 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64)))
(sqrt (sin (* 1/2 (+ phi1 (* -1 phi2)))))
(sqrt.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (pow (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.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)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(* -1 (* phi2 (+ (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1))))))
(*.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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2))))
(* 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 (* -1 phi2)))) 2))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #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 (cos (* -1/2 (+ phi1 (* -1 phi2)))) 2)))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64))
(+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(cos (* -1/2 (+ phi1 (* -1 phi2))))
(cos.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/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 (* -1 phi2)))) 2)))
(fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #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) (* (sin (* 1/2 (- lambda1 lambda2))) (- (* (cos (* 1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda2))))))) (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 phi1) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))

rewrite235.0ms (0.7%)

Memory
14.6MiB live, 246.6MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01441529
02411230
17521228
248041228
081411195
Stop Event
iter limit
node limit
iter limit
Counts
31 → 578
Calls
Call 1
Inputs
(*.f64 (*.f64 (*.f64 (cos.f64 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 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/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 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda2 lambda1) #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.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/2 binary64))) #s(literal 2 binary64))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
#s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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.f64 (/.f64 (-.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
Outputs
(*.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (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 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (*.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)))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #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)) (cos.f64 phi2))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #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 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #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 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 4 binary64)) (*.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (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)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 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 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 (-.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(*.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64)))
(*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) R))
(fma.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) R))
(fma.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) R))
(+.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 3 binary64)) (pow.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 3 binary64))) (fma.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.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/4 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.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/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))
(pow.f64 (neg.f64 (sqrt.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 1 binary64))
(pow.f64 (sqrt.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 2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (*.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(neg.f64 (*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.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/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))) (sinh.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))))
(+.f64 (cosh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))
(*.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(fabs.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #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 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #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 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 4 binary64)) (*.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (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)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 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 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 (-.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (-.f64 (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))) (fma.f64 (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 4 binary64)) (*.f64 (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.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 lambda2 lambda1) #s(literal -1/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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.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 lambda2 lambda1) #s(literal -1/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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.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 lambda2 lambda1) #s(literal -1/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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))))
(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 lambda2 lambda1) #s(literal -1/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 (cos.f64 phi1) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.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 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fabs.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)) (neg.f64 phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.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 phi2 (neg.f64 (*.f64 (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 lambda2 lambda1) #s(literal -1/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 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (*.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 lambda2 lambda1) #s(literal -1/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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (*.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 lambda2 lambda1) #s(literal -1/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 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 phi2)))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (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))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (*.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (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 lambda2 lambda1) #s(literal -1/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 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/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 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(*.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(+.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(*.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64))))
(fma.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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (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)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.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)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(+.f64 (*.f64 #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal -2 binary64)))))
(sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal -2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 (fabs.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (fabs.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(*.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 binary64))
(*.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 lambda2 lambda1) #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 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))
#s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.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/4 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.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/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(*.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))
(pow.f64 (neg.f64 (sqrt.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 1 binary64))
(pow.f64 (sqrt.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 2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (*.f64 (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))))
(neg.f64 (*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) (neg.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))))))
(sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(fabs.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.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/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))) (sinh.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))))
(+.f64 (cosh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #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) (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 lambda2 lambda1) #s(literal -1/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 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #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 2 binary64))) #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))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #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 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 4 binary64)) (*.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (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)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1 binary64)) #s(literal 1 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 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (fabs.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 (-.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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1)) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1))))
(*.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(*.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64)) R)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(fma.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(+.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) R))
(+.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))

eval269.0ms (0.9%)

Memory
6.4MiB live, 236.3MiB allocated
Compiler

Compiled 106 943 to 6 209 computations (94.2% saved)

prune966.0ms (3.1%)

Memory
-7.5MiB live, 766.3MiB allocated
Pruning

178 alts after pruning (177 fresh and 1 done)

PrunedKeptTotal
New80160861
Fresh15117132
Picked415
Done000
Total820178998
Accuracy
64.9%
Counts
998 → 178
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
40.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #s(literal 2 binary64)))
29.3%
(*.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
40.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
57.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
33.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
26.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
25.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))))
28.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))))))))
57.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
59.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
55.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
59.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
59.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
26.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
26.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
27.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
27.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
56.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))
57.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) #s(literal 2 binary64))))))))
60.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
43.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))))))))))
60.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
43.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
36.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
36.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
47.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
47.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
60.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
46.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
49.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
45.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
48.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
41.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
47.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
43.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
43.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
51.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
50.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
52.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
58.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)) (fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
59.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 (/.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
59.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
60.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) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.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)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
59.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)) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
44.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 phi1 phi2) #s(literal 2 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))))))))))
45.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 #s(approx (sin (/ (- phi1 phi2) 2)) (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))))))))))
46.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 #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))))))))))
46.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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
45.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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
48.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
44.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) #s(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 phi2 phi1) #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)))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
39.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 #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 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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))))))))))
39.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (/.f64 (-.f64 (*.f64 (*.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 (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))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
20.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
24.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (-.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
31.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
39.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
8.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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
29.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)))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
43.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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
33.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) 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 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 lambda2 lambda1) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
41.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
41.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
41.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.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)))))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
40.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (-.f64 (*.f64 (neg.f64 phi1) (*.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))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (neg.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
28.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))
24.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) (*.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
40.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (neg.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
26.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
31.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
39.2%
(*.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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.7%
(*.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 (-.f64 (*.f64 (-.f64 #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) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))))
40.7%
(*.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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))
40.7%
(*.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 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))))))
30.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
32.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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
40.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 #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))))))))))
30.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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
32.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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
41.0%
(*.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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))))))
26.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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
29.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
27.4%
(*.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)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
43.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
44.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))))))))
44.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
43.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.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) 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))))))))))
47.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
45.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
43.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
19.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
20.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
23.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
23.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
37.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (fma.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 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
38.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
34.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
40.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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))))))))
37.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) 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)))))))))
24.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
22.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
26.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
6.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
44.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
29.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))) #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)))))))))))
38.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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
22.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
46.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 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
34.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 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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
43.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 #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
36.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
35.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 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 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
33.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 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 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
36.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 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
39.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (PI.f64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (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))))))))))
14.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)))) (-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
24.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
30.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
25.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
21.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
15.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
14.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 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))))))))))
13.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
14.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
12.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
15.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
21.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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)))))))))))
28.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
28.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
28.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
27.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
24.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
19.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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))))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
29.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
24.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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))))))))))
23.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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))))))))))
6.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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))))))))))
6.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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.2%
(*.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
30.6%
(*.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 #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) phi1)) #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 lambda2 lambda1) #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.8%
(*.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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
60.8%
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) #s(literal 2 binary64))))
59.8%
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))))
60.7%
#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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))))))))
Compiler

Compiled 47 199 to 12 173 computations (74.2% saved)

regimes1.1s (3.4%)

Memory
19.4MiB live, 1 066.7MiB allocated
Counts
267 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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) #s(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 phi2 phi1) #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)) (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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(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 phi2 phi1) #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 phi2 phi1) #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(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 phi2 phi1) #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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 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)) (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 #s(approx (sin (/ (- phi1 phi2) 2)) (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 (/.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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (/.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) 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 #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)))) #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))))) (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 lambda2 lambda1) #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 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #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 #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) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 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)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) phi1)) (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) 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)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (fma.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 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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)) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (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) 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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (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)))))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.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 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.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 (cos.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 #s(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 #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)) (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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (/.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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (/.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.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 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (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 (-.f64 lambda1 lambda2) #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 (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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (/.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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 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))))) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #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 phi2 phi1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 #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 phi2 phi1) #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 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 phi2 phi1) #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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (PI.f64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (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 #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 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 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 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 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 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (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 phi2 phi1) #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 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 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 (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 (-.f64 lambda1 lambda2) #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 (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 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))))) (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 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 phi2 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 (/.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 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 phi1) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) phi2 (*.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 lambda2 lambda1) #s(literal -1/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 (-.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.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))))) (*.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 lambda2 lambda1) #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)) (fma.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (neg.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 lambda2 lambda1) #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 #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 (-.f64 (*.f64 (-.f64 #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) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (-.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 lambda2 lambda1) #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 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (-.f64 (*.f64 (*.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 (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))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (-.f64 (*.f64 (neg.f64 phi1) (*.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))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) phi1 (*.f64 (neg.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 lambda2 lambda1) #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 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (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 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64))))) (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 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64))) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 4 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (/.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (*.f64 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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 phi2 phi1) #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)) (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 (pow.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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)))) #s(literal -1 binary64)) (/.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (neg.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.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)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) lambda1 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+.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 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 3 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 (+.f64 lambda2 lambda1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64)))) (sin.f64 (/.f64 lambda2 #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 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
(*.f64 R (/.f64 (+.f64 (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
Calls

12 calls:

139.0ms
(-.f64 lambda1 lambda2)
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)))))
95.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
93.0ms
lambda2
84.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
AccuracySegmentsBranch
61.3%1(-.f64 lambda1 lambda2)
61.3%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
61.3%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
61.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)))))
61.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))))))))
61.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)))))))))
61.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))))))))))
61.3%1R
61.3%1lambda1
61.3%1lambda2
61.3%1phi1
61.3%1phi2
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes1.0s (3.3%)

Memory
0.2MiB live, 935.8MiB allocated
Counts
210 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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) #s(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 phi2 phi1) #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)) (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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(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 phi2 phi1) #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 phi2 phi1) #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(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 phi2 phi1) #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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 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)) (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 #s(approx (sin (/ (- phi1 phi2) 2)) (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 (/.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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (/.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) 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 #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)))) #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))))) (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 lambda2 lambda1) #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 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #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 #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) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 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)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) phi1)) (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) 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)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (fma.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 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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)) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2)))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (fma.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)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* R (* 2 (atan2 (sqrt (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 lambda2 lambda1) #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 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (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) 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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (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) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (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)))))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.f64 (*.f64 (-.f64 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.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 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.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 (cos.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 #s(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 #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)) (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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.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 (/.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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (/.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (/.f64 (-.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 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (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 (-.f64 lambda1 lambda2) #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 (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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 phi2 #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (/.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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 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))))) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 #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 phi2 phi1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 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 (*.f64 (cos.f64 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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 #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 phi2 phi1) #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 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 phi2 phi1) #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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 (PI.f64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 lambda1 (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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (sin.f64 (fma.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 phi1) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (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 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2)))) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (fma.f64 (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 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 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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))))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
Calls

12 calls:

115.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
114.0ms
lambda2
102.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
98.0ms
phi1
80.0ms
R
Results
AccuracySegmentsBranch
60.9%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
60.9%1lambda2
60.9%1phi2
60.9%1(-.f64 lambda1 lambda2)
60.9%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
60.9%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))))))))))
60.9%1R
60.9%1lambda1
60.9%1phi1
60.9%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))))))))
60.9%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)))))))))
60.9%1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes608.0ms (1.9%)

Memory
32.9MiB live, 690.3MiB allocated
Counts
152 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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) #s(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 phi2 phi1) #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)) (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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(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 phi2 phi1) #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 phi2 phi1) #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(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 phi2 phi1) #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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 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)) (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 #s(approx (sin (/ (- phi1 phi2) 2)) (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 (/.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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (/.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) 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 #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)))) #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))))) (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 lambda2 lambda1) #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 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #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 #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) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 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)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) phi1)) (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) 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)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (fma.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 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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)) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
Calls

12 calls:

72.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
65.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
65.0ms
(-.f64 lambda1 lambda2)
61.0ms
phi1
51.0ms
phi2
Results
AccuracySegmentsBranch
60.8%1phi1
60.8%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
60.8%1R
60.8%1lambda1
60.8%1lambda2
60.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))))))))))
60.8%1(-.f64 lambda1 lambda2)
60.8%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
60.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)))))
60.8%1phi2
60.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))))))))
60.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)))))))))
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes1.5s (4.8%)

Memory
-131.8MiB live, 563.7MiB allocated
Counts
151 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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) #s(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 phi2 phi1) #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)) (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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(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 phi2 phi1) #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 phi2 phi1) #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(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 phi2 phi1) #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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 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)) (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 #s(approx (sin (/ (- phi1 phi2) 2)) (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 (/.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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (/.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) 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 #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.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 (cos.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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 1 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)))) #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))))) (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 lambda2 lambda1) #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 (-.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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #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 #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) phi2)) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi1)) phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (/.f64 (+.f64 (neg.f64 (-.f64 phi1 phi2)) (PI.f64)) #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 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64))) phi2)) phi2)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (sin.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (PI.f64) #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 (-.f64 lambda1 lambda2) #s(literal 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)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) phi1)) (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)) #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 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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))))) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) 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)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 1/4 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 (pow.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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))) #s(literal 2 binary64)) #s(literal 1/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.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 (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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(approx (cos (/ (- phi1 phi2) -2)) (fma.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 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (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 lambda2 lambda1) #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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1)))) (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)) (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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (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 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.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 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)) (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #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))))))))))
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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
Calls

12 calls:

958.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)))))))))
74.0ms
lambda1
70.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)))))
61.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
55.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
60.1%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
60.1%1lambda2
60.1%1phi1
60.1%1lambda1
60.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))))))))))
60.1%1R
60.1%1(-.f64 lambda1 lambda2)
60.1%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
60.1%1phi2
60.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)))))
60.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))))))))
60.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)))))))))
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes380.0ms (1.2%)

Memory
36.1MiB live, 364.4MiB allocated
Counts
105 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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) #s(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 phi2 phi1) #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)) (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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(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 phi2 phi1) #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 phi2 phi1) #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(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 phi2 phi1) #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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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 #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 #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
(*.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)))) #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 1/4 binary64)) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (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 (-.f64 lambda1 lambda2) #s(literal 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)) (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 #s(approx (sin (/ (- phi1 phi2) 2)) (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 (/.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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) (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 (/.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (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) 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 #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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) 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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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) (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
Calls

12 calls:

51.0ms
phi2
46.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))))))))
42.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
27.0ms
R
27.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
AccuracySegmentsBranch
59.8%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
59.8%1R
59.8%1lambda1
59.8%1phi1
59.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)))))
59.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))))))))
59.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)))))))))
59.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))))))))))
59.8%1(-.f64 lambda1 lambda2)
59.8%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
59.8%1lambda2
59.8%1phi2
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes268.0ms (0.9%)

Memory
-20.3MiB live, 277.4MiB allocated
Counts
76 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 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 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) 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 lambda2 lambda1) #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 (*.f64 #s(literal -1/2 binary64) phi2)) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 phi2) (*.f64 (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (+ (* (cos (/ (- phi1 phi2) -2)) (cos (/ (- phi1 phi2) -2))) (* (neg (* (cos phi2) (cos phi1))) (pow (sin (/ (- lambda1 lambda2) 2)) 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 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 R #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) #s(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 phi2 phi1) #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)) (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) #s(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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(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 phi2 phi1) #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 phi2 phi1) #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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(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 phi2 phi1) #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 (*.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)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 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 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (/ lambda1 2)) (cos (/ lambda2 2))) (* (cos (/ lambda1 2)) (sin (/ lambda2 2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
Outputs
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))))
Calls

12 calls:

31.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)))))))))
26.0ms
phi1
26.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))))))))))
25.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)))))
24.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
Results
AccuracySegmentsBranch
59.8%1R
59.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))))))))))
59.8%1lambda1
59.8%1phi1
59.8%1(-.f64 lambda1 lambda2)
59.8%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
59.8%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
59.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)))))
59.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))))))))
59.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)))))))))
59.8%1lambda2
59.8%1phi2
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes219.0ms (0.7%)

Memory
-26.2MiB live, 212.2MiB allocated
Counts
58 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #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 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ 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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)) (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 lambda2 lambda1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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

12 calls:

40.0ms
phi2
27.0ms
phi1
16.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
15.0ms
R
15.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
AccuracySegmentsBranch
49.1%2R
49.1%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))))))))))
49.8%2lambda1
60.4%3phi1
52.5%3(-.f64 lambda1 lambda2)
52.5%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
51.3%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
48.5%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)))))
48.5%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))))))))
48.5%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)))))))))
48.1%2lambda2
60.6%3phi2
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes29.0ms (0.1%)

Memory
38.2MiB live, 38.2MiB allocated
Counts
48 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (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 (-.f64 lambda1 lambda2) #s(literal 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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

2 calls:

12.0ms
phi1
12.0ms
phi2
Results
AccuracySegmentsBranch
59.0%3phi1
59.5%3phi2
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes33.0ms (0.1%)

Memory
-19.6MiB live, 26.4MiB allocated
Counts
46 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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 phi2 phi1) #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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 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 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.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)))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #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 lambda2 lambda1) #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 lambda2 lambda1) #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 (-.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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #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 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 phi2 phi1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
Calls

2 calls:

16.0ms
phi2
11.0ms
phi1
Results
AccuracySegmentsBranch
55.3%3phi1
52.3%3phi2
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes15.0ms (0%)

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

1 calls:

11.0ms
phi1
Results
AccuracySegmentsBranch
55.3%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes107.0ms (0.3%)

Memory
-26.7MiB live, 66.8MiB allocated
Counts
37 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1))) lambda2 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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)) #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 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/4 binary64)) phi1 (*.f64 #s(literal -1/2 binary64) phi2)) phi1 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (fma.f64 (neg.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 lambda2 lambda1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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

6 calls:

44.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
21.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
9.0ms
(-.f64 lambda1 lambda2)
9.0ms
phi1
9.0ms
phi2
Results
AccuracySegmentsBranch
51.1%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
44.2%1lambda1
44.2%1phi2
51.1%3(-.f64 lambda1 lambda2)
51.1%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
50.3%3phi1
Compiler

Compiled 17 to 38 computations (-123.5% saved)

regimes56.0ms (0.2%)

Memory
26.6MiB live, 73.1MiB allocated
Counts
32 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (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/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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
Calls

6 calls:

9.0ms
(-.f64 lambda1 lambda2)
9.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))))))))))
8.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
8.0ms
R
8.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
Results
AccuracySegmentsBranch
50.3%3phi1
44.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))))))))))
44.2%1R
50.0%3(-.f64 lambda1 lambda2)
50.0%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
50.1%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Compiler

Compiled 81 to 59 computations (27.2% saved)

regimes112.0ms (0.4%)

Memory
-12.9MiB live, 79.0MiB allocated
Counts
26 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #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 #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) phi1)) #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 lambda2 lambda1) #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)))))))))
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 #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) phi1)) #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 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
Calls

12 calls:

27.0ms
lambda1
11.0ms
(-.f64 lambda1 lambda2)
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))))))))))
7.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)))))))))
7.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
AccuracySegmentsBranch
35.4%3lambda1
33.6%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))))))))))
31.9%1R
37.4%3phi2
37.2%3lambda2
33.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)))))
34.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))))))))
34.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)))))))))
40.1%3(-.f64 lambda1 lambda2)
40.1%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
40.1%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
37.5%3phi1
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes26.0ms (0.1%)

Memory
-13.7MiB live, 40.5MiB allocated
Counts
25 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
Calls

3 calls:

9.0ms
(-.f64 lambda1 lambda2)
7.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
7.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
39.8%3(-.f64 lambda1 lambda2)
39.8%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
40.0%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Compiler

Compiled 14 to 23 computations (-64.3% saved)

regimes10.0ms (0%)

Memory
11.7MiB live, 11.7MiB allocated
Counts
24 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (fma.f64 (*.f64 phi2 phi1) #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) 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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (*.f64 (neg.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (fma.f64 (*.f64 phi2 phi1) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.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 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (fma.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)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 #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))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
Calls

1 calls:

7.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
39.9%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Compiler

Compiled 6 to 9 computations (-50% saved)

regimes14.0ms (0%)

Memory
21.8MiB live, 21.8MiB allocated
Counts
13 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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))))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
Calls

3 calls:

4.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
4.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
4.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
39.4%3(-.f64 lambda1 lambda2)
39.4%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
39.6%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Compiler

Compiled 14 to 23 computations (-64.3% saved)

regimes61.0ms (0.2%)

Memory
-10.4MiB live, 80.5MiB allocated
Counts
11 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
Calls

12 calls:

12.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 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
4.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)))))))))
4.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))))))))
4.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
AccuracySegmentsBranch
29.6%1R
29.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)))))
29.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))))))))))
29.6%1lambda1
29.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))))))))
29.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)))))))))
29.6%1lambda2
29.6%1phi2
29.6%1phi1
29.6%1(-.f64 lambda1 lambda2)
29.6%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
29.6%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Compiler

Compiled 236 to 142 computations (39.8% saved)

regimes43.0ms (0.1%)

Memory
16.7MiB live, 64.0MiB allocated
Counts
10 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 #s(approx (* (pow (sin (* (- phi2 phi1) -1/2)) 1/2) (pow (sin (* (- phi2 phi1) -1/2)) 1/2)) (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))))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
Calls

12 calls:

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

Compiled 236 to 142 computations (39.8% saved)

regimes57.0ms (0.2%)

Memory
-29.0MiB live, 28.8MiB allocated
Counts
5 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
Calls

12 calls:

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

Compiled 236 to 142 computations (39.8% saved)

regimes21.0ms (0.1%)

Memory
24.0MiB live, 24.0MiB allocated
Counts
3 → 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
Calls

12 calls:

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

Compiled 236 to 142 computations (39.8% saved)

regimes21.0ms (0.1%)

Memory
-29.1MiB live, 20.7MiB 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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

12 calls:

8.0ms
lambda2
1.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))))))))))
1.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)))))))))
1.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))))))))
1.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
AccuracySegmentsBranch
24.6%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
24.6%1(-.f64 lambda1 lambda2)
24.6%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
24.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))))))))
24.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)))))))))
24.6%1lambda1
24.6%1phi1
24.6%1R
24.6%1lambda2
24.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))))))))))
24.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)))))
24.6%1phi2
Compiler

Compiled 236 to 142 computations (39.8% saved)

bsearch268.0ms (0.9%)

Memory
5.3MiB live, 191.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
98.0ms
0.0351665600498427
463.9547134502144
156.0ms
-8.90035368820387e+21
-0.0008425050848604209
Samples
230.0ms260×1valid
7.0ms44×0valid
Compiler

Compiled 3 602 to 1 915 computations (46.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 215.0ms
ival-cos: 80.0ms (37.3% of total)
ival-sin: 56.0ms (26.1% of total)
adjust: 21.0ms (9.8% of total)
ival-mult: 19.0ms (8.8% of total)
ival-sub: 9.0ms (4.2% of total)
ival-sqrt: 8.0ms (3.7% of total)
ival-div: 7.0ms (3.3% of total)
ival-atan2: 7.0ms (3.3% of total)
ival-pow2: 6.0ms (2.8% of total)
ival-add: 3.0ms (1.4% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch31.0ms (0.1%)

Memory
31.1MiB live, 31.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
3.0ms
0.0351665600498427
463.9547134502144
26.0ms
-8.90035368820387e+21
-0.0008425050848604209
Samples
21.0ms29×1valid
1.0ms0valid
Compiler

Compiled 3 792 to 2 010 computations (47% saved)

Precisions
Click to see histograms. Total time spent on operations: 20.0ms
ival-sin: 6.0ms (30.7% of total)
ival-cos: 5.0ms (25.6% of total)
adjust: 2.0ms (10.2% of total)
ival-mult: 2.0ms (10.2% of total)
ival-sub: 1.0ms (5.1% of total)
ival-div: 1.0ms (5.1% of total)
ival-sqrt: 1.0ms (5.1% of total)
ival-pow2: 1.0ms (5.1% of total)
ival-atan2: 1.0ms (5.1% of total)
ival-assert: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch260.0ms (0.8%)

Memory
-28.4MiB live, 156.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
117.0ms
7.007665097234519e-7
69.39733575505325
123.0ms
-96.0062723903875
-4.18116826486205e-6
Samples
204.0ms245×1valid
7.0ms43×0valid
Compiler

Compiled 3 560 to 1 870 computations (47.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 197.0ms
ival-cos: 63.0ms (32% of total)
ival-sin: 50.0ms (25.4% of total)
adjust: 20.0ms (10.2% of total)
ival-mult: 18.0ms (9.1% of total)
ival-pow2: 15.0ms (7.6% of total)
ival-sub: 8.0ms (4.1% of total)
ival-sqrt: 7.0ms (3.6% of total)
ival-div: 7.0ms (3.6% of total)
ival-atan2: 6.0ms (3% 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)

bsearch7.0ms (0%)

Memory
10.9MiB live, 10.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
3.0ms
7.007665097234519e-7
69.39733575505325
3.0ms
-96.0062723903875
-4.18116826486205e-6
Compiler

Compiled 3 794 to 1 798 computations (52.6% saved)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.008656332840372543
0.020376185291223932
0.0ms
-2.4349245277249914e-41
-2.6302718382076607e-51
Compiler

Compiled 53 to 35 computations (34% saved)

bsearch262.0ms (0.8%)

Memory
17.6MiB live, 208.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
125.0ms
29361.215281879046
5968987201.692425
126.0ms
-96.0062723903875
-4.18116826486205e-6
Samples
198.0ms237×1valid
37.0ms35×0valid
Compiler

Compiled 3 902 to 2 086 computations (46.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 221.0ms
ival-cos: 97.0ms (43.9% of total)
ival-sin: 48.0ms (21.7% of total)
adjust: 19.0ms (8.6% of total)
ival-mult: 17.0ms (7.7% of total)
ival-sub: 11.0ms (5% of total)
ival-sqrt: 7.0ms (3.2% of total)
ival-div: 7.0ms (3.2% of total)
ival-pow2: 6.0ms (2.7% of total)
ival-atan2: 6.0ms (2.7% of total)
ival-add: 2.0ms (0.9% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.06452534718913508
0.09001849042606924
0.0ms
-2.6302718382076607e-51
-7.421021056908436e-54
Compiler

Compiled 53 to 35 computations (34% saved)

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.06452534718913508
0.09001849042606924
0.0ms
-2.6302718382076607e-51
-7.421021056908436e-54
Compiler

Compiled 53 to 35 computations (34% saved)

bsearch1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.11153361169352671
0.11602897642231151
0.0ms
-2.6302718382076607e-51
-7.421021056908436e-54
Compiler

Compiled 53 to 35 computations (34% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.11153361169352671
0.11602897642231151
0.0ms
-2.13435820686595e-28
-1.1214365704352424e-33
Compiler

Compiled 53 to 35 computations (34% saved)

simplify101.0ms (0.3%)

Memory
-33.0MiB live, 112.5MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
03753764
16023751
211573712
329223649
468333649
Stop Event
node limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))))
(if (<=.f64 phi2 #s(literal -8669969714643489/9223372036854775808 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 5188146770730811/144115188075855872 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 -7839866231326559/9223372036854775808 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 5188146770730811/144115188075855872 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 phi1 #s(literal -5902958103587057/18446744073709551616 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 6198106008766409/590295810358705651712 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (<=.f64 phi1 #s(literal -5902958103587057/18446744073709551616 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 6198106008766409/590295810358705651712 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -7846377169233351/392318858461667547739736838950479151006397215279002157056 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/576460752303423488 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 phi1 #s(literal -3458764513820541/144115188075855872 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (if (<=.f64 phi1 #s(literal 132000 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 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 #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) phi1)) #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 lambda2 lambda1) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 8286623314361713/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -8920298079412249/44601490397061246283071436545296723011960832 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 8286623314361713/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (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 2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (*.f64 (neg.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 2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.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 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))
(*.f64 R #s(approx (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) (sqrt.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64))))
(if (<=.f64 phi2 #s(literal -8669969714643489/9223372036854775808 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 5188146770730811/144115188075855872 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 lambda2 lambda1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 -8669969714643489/9223372036854775808 binary64)) (not (<=.f64 phi2 #s(literal 5188146770730811/144115188075855872 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)) (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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(if (<=.f64 phi2 #s(literal -7839866231326559/9223372036854775808 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 5188146770730811/144115188075855872 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (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 (-.f64 lambda1 lambda2) #s(literal 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 -7839866231326559/9223372036854775808 binary64)) (not (<=.f64 phi2 #s(literal 5188146770730811/144115188075855872 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #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 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
(if (<=.f64 phi1 #s(literal -5902958103587057/18446744073709551616 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 6198106008766409/590295810358705651712 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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 (*.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (or (<=.f64 phi1 #s(literal -5902958103587057/18446744073709551616 binary64)) (not (<=.f64 phi1 #s(literal 6198106008766409/590295810358705651712 binary64)))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 lambda2 lambda1) #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) phi2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)))))))))
(if (<=.f64 phi1 #s(literal -5902958103587057/18446744073709551616 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1)))))))) (if (<=.f64 phi1 #s(literal 6198106008766409/590295810358705651712 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 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 phi2 phi1) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (or (<=.f64 phi1 #s(literal -5902958103587057/18446744073709551616 binary64)) (not (<=.f64 phi1 #s(literal 6198106008766409/590295810358705651712 binary64)))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.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 phi2 phi1) #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 lambda2 lambda1) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -7846377169233351/392318858461667547739736838950479151006397215279002157056 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/576460752303423488 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -7846377169233351/392318858461667547739736838950479151006397215279002157056 binary64)) (not (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/576460752303423488 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* lambda2 (neg (cos phi1))) (* (* (cos phi2) (sin (* 1/2 lambda1))) (cos (* -1/2 lambda1)))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))) lambda1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)))))))))))
(if (<=.f64 phi1 #s(literal -3458764513820541/144115188075855872 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (if (<=.f64 phi1 #s(literal 132000 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 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 #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) phi1)) #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 lambda2 lambda1) #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 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 5764607523034235/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (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) (-.f64 lambda1 lambda2))) #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 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 phi1))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 8286623314361713/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1684996666696915/842498333348457493583344221469363458551160763204392890034487820288 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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))))) #s(approx (+ (* (* (sin (* 1/2 phi1)) phi2) (cos (* -1/2 phi1))) (- (pow (cos (* -1/2 phi1)) 2) (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 8286623314361713/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))
(if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -8920298079412249/44601490397061246283071436545296723011960832 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (if (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 8286623314361713/72057594037927936 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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64))))))))))
(if (or (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -8920298079412249/44601490397061246283071436545296723011960832 binary64)) (not (<=.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 8286623314361713/72057594037927936 binary64)))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (neg phi2) (* (cos (* -1/2 phi1)) (sin (* 1/2 phi1)))) (+ (* (pow (sin (* (- lambda2 lambda1) -1/2)) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (pow.f64 (sin.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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2))) (cos.f64 phi1) (pow.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (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 phi2 phi1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))) #s(approx (+ (* (* (* (cos phi1) lambda1) (* (cos (* 1/2 lambda2)) (cos phi2))) (sin (* -1/2 lambda2))) (+ (* (* (cos phi2) (cos phi1)) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* (- phi2 phi1) -1/2)) 2))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi2 phi1) #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)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) #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)))))))))

derivations1.6s (5.1%)

Memory
19.3MiB live, 814.0MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01271104
0217970
1686958
24686958
08491939
07977550
129077270
080406930
026288
045288
1152243
21049235
08130230
086210386
130169830
082079361
0125513968
1448313908
0900213168
04915291
117315020
273925017
082794787
01061357
01911305
15331156
234041156
085991123
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 3 755 to 380 computations (89.9% saved)

preprocess246.0ms (0.8%)

Memory
26.9MiB live, 216.7MiB allocated
Remove

(negabs R)

Compiler

Compiled 8 530 to 1 292 computations (84.9% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...